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With BUSINESSPAK+ the Model 100 GRAPH+: Prints out Bar, Line and 


is virtually a complete tool for the 
manager or executive. Picture how 


this added capability will help you. 


WRITE+: Instead of merely a text 
preparation device the Model 100 
becomes a real word processor. 
Margins . . . side, top and bottom. 
Title page, topic headings, page 
numbers, and even headers and 
footers. You can even right justify 
and print multiple copies. It has 
over 36 features and countless 
format possibilities. 

EXPNS+: By simply entering 
expenses into eighteen categories, 
you get a twelve day spreadsheet, 
giving totals for each day, and 
category. Names of rows and 
columns are instantly changeable, 
and the sheet becomes a budget 

or even a financial report. Replica- 
tion across the columns, cumlative 
totals, and automatic growth or 
decline rate projection, make 


EXPNS* an excellent planning tool. 


And, all the math is built right in. 


CERTIFICATION 
SEAL 


TRS-80 is a trademark of 
Tandy Radio Shack, Inc. 


© 1983 Portable Computer Support Group 
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Pie graphs of any EXPNS+ report 
on the DMP-100 dot matrix printer. 
Shows the percents on the pie chart 
and values on the others. 


TELEX+: From any phone send any 
text file to any Telex machine in the 
world. Just enter the receiving 
Telex number. Send Mailgrams for 
next day delivery to any address 

at reduced rates through the 

Action Telex system. 





PUT+: Lets you list any informa- 
tion in an organized fashion. It 
prompts for each entry and very 
rapidly creates addresses or schedule 
items and even inventory. 








SORT+: Allows you to sort any 
list you compile with PUT+ alphabet- 
ically or numerically from any 
category in the entry. It can sort 
large files up to 20 times faster than 
an all Basic program. 


MASTERCARD/VISA/COD 


PCSG provides hotline software 
support for the Model 100. Give us 
a call at 1-214-351-0564. 


RORTABLE COMPUTER SUPORT ORCUP 


11035 Harry Hines Blvd. No. 207, Dallas, Tx. 75229 





From Computer Plus to YOU... 


PLUS after PLUS after ъв LUS 


Model 42 
1 Drive $2699 
2 Drive $3375 


Okidata 80 $320 
Okidata 82A $399 
Okidata 92 $540 


BUY DIRECT 


COMPUTERS 
Model 12 64K 1 Drive 
Model 12 64K 2 Drive 
Model IV 16K 
Model IV 64K 
2 Disk & RS232 c 
Color Computer 16K 
Color Computer 16K 
wiextended basic 
Color Computer 32K 
wiextended basic 
Pocket Computer 2 
Model 16 1DR 128K 
Model 16 2DR 128K 
Model 100 8K 
Model 100 24K 
MODEMS 
Lynx Direct Connect MI/MIII 
Hayes Smart Modem II 
Hayes Smart Modem 1200 
Novation Smartcat 1200 
Novation J-CAT 
R.S. Acoustic Coupler AC-3 


We have the lowest possible 
Fully Warranteed Prices AND 
a full complement of Radio Shack 


Software. 


Prices subject to change without notice. 
Not responsible for typographical errors. 


TRS-80 is a registered trademark of Tandy Corp. 


$2699 
3375 
849 


1699 
175 


255 


345 
165 
4199 
4799 
679 
835 


235 
235 
565 
459 
125 
129 


Color Computer 16K $175 
w/46K Ext. Basic $255 
w/32K Ext. Basic $345 


272712 


/ 


Color Computer Disk Drive 
Drive0$470 Drive 1 $299 


R.S. Modem! D.C. 129 
R.S. Modem 1 D.C. 199 
R.S. DC-1200 
PRINTERS 
Daisy Wheel Il 
DWP-410 
Silver Reed EXP 550 D.W. 
Smith Corona TPI Daisy Wheel 
Epson 
CGP-115 
DMP-100 
0МР-120 
ОМР-200 
DMP-400 
DMP-500 
DMP-2100 
Okidata 82A 
Okidata 83A 
Okidata 84 Parallel 
Okidata 92 
Okidata 93 
Gemini 10 
Prowriter 


Model IV 16K $849 | 
Model IV 64K 
2 Disk & RS232 c $1699 


Smith Corona ТР” 
Daisy Wheel $495 


Here are just a few of our fine offers... 
call TOLL FREE for full information. 


DISK DRIVES 
R.S. Model IV 1ST-Drive 
Tandon 40 Track MI 
Color Computer Drive 1 
Color Computer Drive 0 
Primary Hard Disk MII 
Primary Hard Disk MIII 
ETC. 
CCR-84 recorder 
C. C Joysticks 
16K RAM Chips 
64K RAM Chips 
32K Microbuffer Inline 
SOFTWARE 
Brand Name Software е 
Send for listing. 
R.S. Software 10% off list 
Coco FHL Flex D.O.S. 
Parallel Printer Cables are 
available for most computers. 


Color Computer 64K requires 
Disk 0 and D.O.S. 


69.95 


TOLL FREE 
1-800-343-8124 


com 


P.O. Box 926 

480 King Street 
Littleton, MA 01460 
617-486-3193 


US 


Write for your 
free catalog 
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Join Us For AWorld Of Portable Computing. 


We're glad you picked up this пана copy of PCM — The Portable Computing Magazine and we 
hope you'll like us. 

We аге the people who publish the Rainbow, the leading magazine for the TRS-80 Color Computer. By 
deciding to publish a second magazine devoted exclusively to one model of the TRS-80 family, we plan to 
adapt the formula which carried the Rainbow to the top of its field. 

In a word, we expect to be a success because of you. We won't confuse you with a lot of computer 
gibberish, we don't plan to devote a lot of space to a whole number of arcane "secrets" of the Portable 
Computer that you probably won't use and will care about even less. But, most important of all, we expect 
to have a user-oriented magazine that will answer your needs and interests. 

We hope this inaugural issue of PCM — The Portable Computing Magazine will give you some idea of 
what we will be trying to do. 

For example, Robert Frowenfeld's lead article on making graphs with the Portable Computer and the 
Radio Shack Color Graphics Printer should give you some idea of the versatility built in to your new 
Model 100. Robert, one of our contributing editors, also begins a series called “On The Road," which will 
give you both some ideas and practical methods for using your Portable while away from home base. 

We think the software built into the Portable Computer is super. This month we'll show you how to be 
sure the sorting utility works that is printed in the manual that came with your 100. That is, we'll alert you 
toa possible problem that could occur. In future issues, we'll be showing you other things you can do with 
the “ADDRESS” and “SCHEDULE” programs that are built in. 

We firmly believe the Portable Computer isn't all for business. But, Vincent Lord hasa couple of short 
programs which you can use in figuring out business-type problems. We hope you will find them useful. 
Also, there is a full-scale loan amoritization program that will let you know a great deal about money at 
interest. 

Did we say that the Portable Computer can be fun, as well as useful? Well, there is our NIM program, 
too. Great fun. Try to beat your computer. Let us know if you do. 

And, no one has ever disputed the educational value of a computer. So, our QUIZ program can teach 
Spanish or French, geography or just about anything else. It is built to drill the youngsters around you on 
just about any subject. All you have to do is plug in the questions and answers. 

There are a few other things here, too. Including advertisments. Take note of them. And, please, 
mention our name when you do place orders. It will help us grow and, in growing, we will be able to better 
serve you. 

Yes, do please consider PCM — The Portable Computing Magazine as yours. We welcome your 
suggestions and thoughts. We encourage you to send us your programs and hints. Address them to PCM 
Submissions Editor. (Well pay for contributions.) And, please use our “Letters” column to tell all the 
other Portable Computer owners out there things you have found out — or ask something you want to 
know. (No, don't look too hard for the *Letters" column this month, it isn't here. We have to have a 
magazine before we can get any letters, don't we?) 


And, we want to make you aware of the PCM Certification Seal. It will be your assurance of the 
working existence of a product for your Model 100. 


You may be interested in learning about some of the people who are on the masthead of this issue. Our 
managing editor, Courtney Noe, was the Rainbow 5 first editorial employee. He has a lengthy and varied 
background in magazines and journalism and a Model 100 he proudly calls his own. Jerry McKiernan, 
our art director, planned the “look” of this magazine and also has worked on the Rainbow, among other 
publications. 

Charlotte Ford, our advertising manager, will assist you with any advertising needs you may have and 
Ivanka Kleier, our customer service manager, will help you with any subscription questions you may 
have. Pat Hirsch, our general manager, will always be ready to assist in almost anything. 

But the most important member of our staff is you! We look to you for help, input and contributions. 
We willlisten to your wants and needs. And, together, we hope to have an outstanding magazine that will 
support an excellent computer. 

We look forward to working for you and with you. 

— The Editors 
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Portable Computing 
Will Be Your Key 
lo A New World 








ello. And welcome to PCM. We 
believe you're going to like us. 

For the record, PCM is brought to 
you by the same people who publish a 
magazine for the TRS-80 Color Com- 
puter called the Rainbow. And many of 
the things which have made that maga- 
zine the leader in its field will apply to 
PCM, too. 

As you can obviously tell from the 
heft of this issue, we intend for PCM to 
start sort of small and grow with you 
and your portable computer. And, 
while we believe we have enough infor- 
mation in these pages to keep you busy, 
don't be surprised if, a year from now, 
you end up holding a magazine that's 
more than 100 pages. 

We believe there is a great future for 
your portable computer and for you. 
PCM intends to be part of that future 
and to share it with you. 

This being our inaugural issue, I 
thought you would be interested in what 
PCM will be and what it will not be. 

First of all, we are an independent 
magazine. We are not sponsored by any 
company or software firm. That's 
important, because we plan to carry 
extensive reviews of all sorts of 
products—hardware, software and 
firmware—that will be available for 
your Portable Computer. In so doing, 
we will be able to be independent and to 
give you fair and accurate information 
about anything you might consider 
purchasing. 

Second of all, we are not in the soft- 
ware business. Yes, our plans include 
the possibility of offering you programs 
which appear in PCM on tape at some 


time in the future. But, we will not be 
hawking products of our own. 

Why not? Because we wish to remain 
independent. And we want you to be 
certain that, when we evaluate a pro- 
duct, we will evaluate it without concern 
about anything that we might be selling. 

Third, you will find that we have no 
ax to grind with any company, individ- 
ual or organization. You should be 
aware that this includes Radio Shack 
and Tandy Corp. When we see some- 
thing good, we'll say so. And when we 
see something we don't like, we'll say 
that, too. But, in keeping with good 
journalistic practice, when we do print 
opinion, we'll label it as such. 


Most important of all, we intend to be 
a readers' magazine. We will publish 
programs you can use —and we'll ask 
you to send along those in which you 
think others will be interested. Yes, we 
will pay you for them. Just let us know 
whether you want remuneration. 

We intend to have a lively and infor- 
mative “Letters To The Editor" feature, 
an “insider’s” column so you'll know the 
latest news of what's happening that 
affects your Portable Computer, tutor- 
ials on how to use the various functions 
and many more features — some of 
them on specific areas of interest. 

But, most of all, we intend to have 
programs. Programs you can key in and 
use. We'll give you information about 
how a program works (whenever possi- 
ble) so you can learn while typing them 
in. But, remember, PCM is a magazine 
that you will be able to use. We'll be 
short on theory and long on practical 
applications. 


Also, don't expect to see a lot of 
material (or any, for that matter) about 
"other" computer systems. We're a spe- 
cialized publication devoted to the Por- 
table Computer. That means simply 
that you won't have to “wade through” 
alot of other materialto find something 
of interest to you. And, while some pro- 
grams — due to memory requirements 
— тау not run on your own machine, 
all will be written to run on your own 
Portable Computer. That's a big bonus 
to you, because everything here is appli- 
cable to you! 


You should know there is genuine 
enthusiasm here at PCM for the con- 
cept of portable computers. And, too, 
there is excitement about the TRS-80 
Model 100 Portable Computer. Yes, we 
will probably get into some of the other 
portables. We find that many applica- 
tions are similar. 

We believe you will share our excite- 
ment about portable computing. It 
opens up avenues which never were 
open before. We hope you will consider 
us to be your magazine, that you will tell 
your friends and associates about us 
and that you will mention our name 
when contacting advertisers. That's 
important to us, but it is important to 
you, too. As we grow, we will be able to 
offer more pages, more information and 
more portable computing insight than 
we can without your support. 

We look forward to our association 
with you. 

Please contact us if we can help or 
work with you in any way. 


— Lonnie Falk 
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Skyline Software 


PUBLISHERS OF QUALITY MICROCOMPUTER SOFTWARE 


The Porta" series from Skyline— 
to help you work faster and better! 


PortaCalc? — Model 100 "electronic spreadsheet" with 15 column by 26 row workspace! Full use of 
the built-in function keys to save, load, screen print, report print, or to look behind the data at the 
formulas in use. 


Full arithmetic operators including exponentiation, absolute value, integer, summation, and averaging. 
Calculations are done to 14 digits of precision and displayed up to 9 digits. User selectable decimal 
place from none through seven—not just one, two, or floating! Formula replication is included to 
allow fast creation of worksheets. 


Worksheets may be saved, loaded, or merged using the computer's memory or cassette. Often used 
templates can be saved in memory for instant recall. DIF file creation feature allows transfer of 
worksheets or data to VisiCalc on your big machine back at the office! 

Printer driver gives more control for report formatting. 

Comes with extensive documentation in padded 3-ring binder. Includes tutorial, detailed reference 
section, and executive level sample templates. Fully illustrated with screen prints, examples, and hints. 


PortaStat? — Correlation, regression analysis, covariance and descriptive statistics package, designed 
to be a working tool for today's businessman. Data can be input from cassette, memory, or keyboard. 


Interactive with PortaCalc data files! Thoroughly documented, includes tutorial. 


PortaFin® — Present value, net present value, future value, annuities, interest factors, loan 
constants, internal rate of return and more! This user-friendly package prompts you for the 


needed input data, then gives you the answer to your loan or 
investment problem! Interactive with PortaCalc files, allowing 
you to "read" cash flow data from memory. Keyboard or 
cassette input also available. 


PortaMax® — The powerful ‘simplex’ method of linear 
programming. Find the optimum 'mix' for a given set of 
constraints. Interacts with PortaCalc files to avoid time-wasting 
repetitive data entry. Tutorial, examples, and bibliography included. 


PortaMed® — an ‘electronic clipboard’ for the medical pro- 
fessional. Already in use at a major hospital. Patient medical 
record keeping and report generation. Clearly documented, and 
easy to use. 

PortaFolio® —Stock and bond valuation, betas, Macaulay's 
duration, yield to maturity, bond swap calculations, and much 
more. All in an easy to use program, interactive with PortaCalc 
data files. Supplied with comprehensive instructions and 
reference manual. 


All Porta series programs are supplied on cassette and require 
24K RAM. 


Pricing — PortaCalc is $69.95, all others are $44.95 each. 


SPECIAL OFFER: 

Computer cassette recorder, with cable for Model 100, and a 
dozen data cassettes with cases — $49.95 with any Porta 
software purchase. 

Model 100 is a trademark of Tandy Corp. VisiCalc is a trademark of VisiCorp. DIF is a trademark of Software Arts 


ORDERING 
INFORMATION 
ALL ITEMS SHIPPED 
FROM STOCK 


Phone orders 
may be placed at: 


(312) 260-0929 
(Our voice line), 


or with your 
computer at: 


(312) 588-7917 
(Our MODEM line) 


$2.00 shipping and handling 
per order. 


Mail orders should be sent to: 


SKYLINE 
MARKETING 
442 Sunnyside 
Wheaton, IL 
60187 


ЕЕ 





PLOTTING GRAPHS 


with the 
ӨЗ ЛЕ оо, 


ne of the biggest advantages of 
Qv» a computer is the ability 

to perform operations that 
would normally be either too tedious or 
even impossible to do manually. Plot- 
ting graphs has always been one of those 
things that 1 knew a computer could do 
more quickly and accurately than I 
could by hand. Whether plotting a 
mathematical equation, your corpora- 
tion's sales history, or even the Dow 
Jones industrials average, a well 
designed graph drawn by a computer 
can be very helpful. Instead of pouring 
over columns of figures, the person 
viewing a graph can immediately pick 
out trends and/or changes and get a 
much better understanding of what the 
numbers actually mean. 

I’ve found that using the Model 100 
Portable Computer along with the 
Color Graphics Printer (CGP-115) 
produces super multi-color graphs. The 
CGP-115 uses roll paper which is 4” 
wide. While four inches may not seem 
like it would be wide enough to produce 
an acceptable graph, the CGP-115 has 
the ability to print as many as 80 charac- 
ters ona 4” line, and can rotate charac- 
ters 90 degrees in any direction. 

The accompanying program was 
originally designed to run ona TRS-80 
Model 16, and has been successfully 
adapted to run on the Model 100. The 
program takes upa little less than 6K of 
memory and will easily run on a 
machine equipped with 16K. In order to 
run this program, two data files must be 
created, One defines the graph titles, X 
and Y axis scales and axis labeling 
information. The second file (see List- 
ing #3) contains the data to be plotted. 
When setting up the two files, a special 
convention must be used for the file- 


names so that the plotting program will 
know where to find them. In this exam- 
ple, I named the format file TESTF.DO 
and the data file TESTD.DO. The 
extension “.DO” indicates that the files 
are ASCII character files, similar in 
nature to any document file created 
with the TEXT program that comes 
installed on the Model 100. When nam- 
ing the files, the same name must be 
used with the last character in the name 
of the format file; an *F" (for format) 
and the last character of the data file a 
"D" (for data). Since the Model 100 
allows up to six characters for the file- 
name, the format and data files can have 
unique titles up to five characters in 
length with the last character an *F" or 
"D." When the program is run it will ask 
for the filename to be plotted. In the 
example here, where the format and 
data files are named TESTF.DO and 
TESTD.DO respectively, the proper 
response is to enter the four-character 
name TEST. Once the ENTER key is 
pressed the CGP-115 starts plotting. 

To generate the format file, I used the 
TEXT program that comes with the 
Model 100. The format file items and 
their type (alpha or numeric) are listed 
in Table 1. Following isa description of 
each item's purpose: 


Table 1 


Item # Description Type 
Main Graph Title Alpha 
Sub-title Alpha 
X-Axis Title Alpha 
Y-Axis Title Alpha 
Grid (Y or N) 
HX Units Numeric 
#Y Units Numeric 
Smallest X Value Numeric 
Largest X Value Numeric 
Smallest Y Value Numeric 
Largest Y Value Numeric 
#X Divisions per unit Numeric 
#Y Divisions per unit Numeric 
Number of Lines Numeric 
X axis label format Alpha 
Y axis label format Alpha 
Point Markers (Y or N) 
Line Label Print Size Numeric 
(0—2) 


№ оо —) Ov tA 4 C9 2 — 


Following is a brief description of the 
funtion each of these items plays in for- 
matting the graph. 

1—4) These titles can be of any length. 
The number of characters should be 
kept reasonably small, especially in the 
case of the Y axis title so that it will fit 
within the graph boundaries. 

5) If a grid overlay is desired this should 
be a "Y," otherwise “N.” This can be 
rather handy when interpolating the 
value of a continuous function. In this 
example, a grid was not used and “N” 
was entered. 

6—7) This is the number of units to be 
labeled on each axis. Do not include the 
first point to be labeled (the origin) 
when counting; the program does this 
automatically. 

8—11) These are the lowest and highest 
values on the X and Y axes. Note that 
these are not necessarily the maximum 
and minimum values of the data points 
to be plotted, but the lowest and highest 
values that will be labeled on the axes. 
The program won't check to see if your 
data actually fits within these limits, so 
these values should be selected with 
care. 

12—13) This is the number of divisions 
into which each unit on the X and Y 
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axes is to be divided. In the case of the 
example, a value of 2 was specified for 
the X axis and 4 for the Y axis. This 
resulted in two and four divisions 
between each labeled numeric value on 
the X and Y axes respectively. A value 
greater than or equal to | must be speci- 
fied for these values. 

14) Any number of lines can be specified 
here; the example uses two. 

15—16) The format for the printing of 
the values along the X and Y axes has 
the format “m.n,” where m is a series of 
“Н characters used to represent the 
number of digits to the left of the 
decimal point and n is a series of “#” 
characters to represent the number of 
digits to be printed to the right of the 
decimal point. For example, if the 
numbers to be printed along one of the 
axes were in the range of 0—100, then 
the appropriate format would be “###.” 
In the example used for the plot appear- 
ing in this article, formats for the X and 
Y axes were chosen as “##.#” and “#.#” 
respectively. Had the Y axis format 
been “#.##,” for example, the values 
would have appeared as “0.00,” “0.20,” 
"0.40," . . . “1.00.” 

17) If the value of this is specified as "Y," 
then a marker will be placed at the posi- 


Figure 1 


tion of the data point. The marker is 
specified later on in the line specifica- 
tions. The example in this article uses 
point markers. If markers are not 
desired, use the character “N.” 
18) This is the size of print used to print 
the line titles and can have an integer 
value of 0, 1, or2. Using the value 0 will 
result in extremely small print, 20 pitch, 
or 80 characters on a 4" line, to be exact. 
Size l is used in the example and results 
in 10 characters per inch. Size 2 can be 
used and prints large letters (6.7 charac- 
ters per inch). 

For each line, the following informa- 
tion must be supplied: 


Line Type Numeric 
Line Title Alpha 

Next Line (Y or N) 
Number of Points Numeric 
Line Color Numeric 
Marker Character Alpha 

X Title Position Numeric 
Y Title Position Numeric 


a) The line type has a value of (0—15) 
and corresponds to the line type des- 
cribed in the CGP-115 manual. There 
are 16 different types of lines, ranging 
from a solid line to several types of 
dashed lines toa very fine dotted line. In 
the accompanying example, the line 
type used was 0; this generates a solid 
line. 

b) The line title can be of any length. 
Care must be taken to position the title 
so that it fits within the boundary of the 
graph. 

c) Next line indicates if there are more 
lines to plot. The example here contains 
two lines. For the first line a ^Y" is used 
to indicate that there is a second line to 
plot. The second line is also the last line 
so a "N" is used. 

d) This is the number of points the line 
contains. Our example's lines each con- 
tain 21 data points. 

е) Line color is indicated as follows: 0 = 
black, | = blue, 2 = green, 3 = red. 

f) The marker character must be speci- 
fied, and can be any one of the 96 char- 
acters the CGP-115 can print. This 
includes: 0—9, A—Z in both upper and 
lower case, and some special symbols 
such as !“#$%'()*+,-/:;<=>?@[]. Even 
if marker symbols are not desired, a 
character (even a blank) must be 
declared. 

g,h) These are the X and Y coordinates 
of the starting position of the line title 
(item “а” above). These are defined in 
terms relative to the scales printed along 
the X and Y axes. If, for example, we 
had wanted to print the titles at the bot- 
tom of the graph (below the X axis) the 
Y coordinate would have been in the 
neighborhood of -0.3. Keep in mind 
when determining the starting position 
for the line title that a sample line !^" 
long will be printed at that position with 
the title printed just to the right. 

The data file (Listing 3) was gener- 
ated by the program in Listing 4. The 
format of the data file is as follows. The 
first item in the data file is the number of 
lines for which there is data; two in this 
case. Next, each line of the sequential 
data file consists of a series of X,Y pairs 
of numbers separated by a comma. 
After the last X,Y pair is the point 
999.999,999.999: this tells the program 
there is no more data for this line and 
the next data is for the following line. 





With a little bit of practice, anyone with a Model 100 and 
CGP-115 can generate neat, impressive line graphs. I use a 
modified version of this program to chart my stocks by 
plotting prices, volumes and moving averages. I know sev- 
eral people who are using this program to keep an eye on 
sales figures and productivity performances. 


GOLDLABEL' 
BLANK CASSETTES 


x PREMIUM 5 SCREW SHELL 
x COMPUTER DATA QUALITY *LOW NOISE 
ж MADE IN USA x GUARANTEED 


1 DOZEN C-10 LENGTH $8.50 + $2.50 shpg. 
2 DOZEN C-10 LENGTH $16.00 + $3.50 shpg. 


1 DOZEN C-30 LENGTH $12.50 + $2.50 shpg. 

2 DOZEN C-30 LENGTH $23.50 + $3.50 shpg. 
Individual storage boxes (sold only with cassettes) $2.40 per dozen. 
CASSETTE CADDY: $3.95 + $2.00 shpg. 

2 for $7.00 + $3.00 shpg. 


Free shipping on one caddy with each dozen cassettes. 


Foreign orders include shipping at 16 oz. per dozen tapes/9 oz. per 
caddy/13 oz. per dozen boxes. Shipped in U.S. by UPS. 


CASSETTE CADDY 


TIRED OF MISPLACED TAPES AND A CLUTTERED WORK AREA? TRY 
OUR HINGED TOP SMOKED PLASTIC CADDY THAT HOLDS 12 TAPES IN 
ONE HANDY LOCATION. EDGE LABELS INCLUDED TO IDENTIFY TAPES. 


CERTIFICATION 
SEAL 


Visa and Mastercard accepted (include expiration date) Orders paid by 
cashier's check, money order or bankcard are shipped within 48 hours. 
Personal check takes 1-2 wks. No COD. Some foreign sales are restricted. 
Texas residents add 5% tax. 


COLOR SOFTWARE SERVICES 
P.0. BOX 1708, DEPT. R 
GREENVILLE, TEXAS 75401 


Telephone Orders: (214) 454-3674 9-4 Monday-Saturday 
*DEALER INQUIRIES INVITED QUANTITY DISCOUNTS AVAILABLE 
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Listing 1: 


1 CLEARI@@@:DEFINT I-Q,WsDEFSTR А,К,71ДЕ 
FDBL P:DEFSNG X,Y:IzÜ:JsQ:CLS ‘prun 

2 RIS=CHR$(27)+"p"sUS=CHR$ (27) *"q" 

4 М0-100 

5 B0TO71 

30 A!'zX:B!'zY:80SUBAAILPRINT"D"*XY$: RETUR 
N 

31 А! =Х: В! =Үг 6050844: Ы РКІМТ"М"+ХҮ$: RETUR 
N 

32 GOSUB48:LPRINT"D"+PT$sRETURN 

41 A$zUS*STRING$(20-LEN(A$) /2," ")*A$*EL 
$:RETURN 

42 IES=STRINGS(S-LEN(IE$) ," ")*IES:RETUR 


43 PNS=LEFTS(STRS(A#) ,7) : RETURN 

44 XY$STR$(A!) +", " -KSTRS(B! ) 9RETURN 

45 AX$z"XQ,"*STRS$CI) *","*STR$(J) sRETURN 

46 RAY$z"X1," *STR$(CI) +", "*STR$(J) 3RETURN 

47 CW!z480/(80/(1*4!) ) : RETURN 

48 PT$zSTRS$((Y! -BY) *FY) +", " -*STR$(C-X! *SX 

) *FX) RETURN 

71 TX$sCHR$(17) 188$zCHR$(18) : RPSzCHR$(29 

):XA=840: YA=240 

95 DIM X(84),Y(54) 

188 CLOSE:CLS 

110 A$-R$*" CGP-115 Plot Generator "*U$! 

GOSUB41:PRINTUS; AS 

120 PRINT@85,U$" Enter File to Plot : 
"Ry STRING$(12,8)3:LINEINPUT IN 

5: 1Е IN$z"" THEN 9999 

122 IF LEN(IN$)>4 THEN 120 ELSE A=LEFTS( 

IN$,1):IF AC"A"OR AD"Z" THEN 128 

124 IF MD=16 THEN ID$=IN$+"/LIN" ELSE ТЕ 

MD=10QTHEN ID$=IN$+"F. DO" 

125 IE$=IN$ 

130 508089000: IFSTzÜTHEN128 

140 GOSUB6500 

190 A$=" Press ENTER key to start plotti 

ng"sGOSUB41:PRINT@160,A$3 : LINEINPUTIN$ 

191 IFINS="H"THENRUNELSEA$="Plotting ... 

"1608UB41: PRINT6240,4$; 
199 80702000 


310 IFTT$2""THENRETURN 

520 L=LEN(TT$) 

350 Сіз80/(1%51) 

348 CW=480/CL 

350 Y=-(XA/2)+L/2*CW 

380 XO=X:Y¥O=¥:GOSUB31L:LPRINT"S"+CHR$ (48+ 
SZ) sLPRINT"Qi":LPRINT"P"+TT$ 
370 RETURN 

400 

410 IFTT$=""THENRETURN 

420 L-LEN(TT$) 

430 Сі-80/(1%67) 

448 CW=480/CL 


450 X2(YA/2) -L/2*CW 
450 X8zX:Y8zY:808UB31: LPRINT"S"*CHR$ (48+ 
82) 1LPRINT"QU" 1LPRINT"P"«TT$ 

470 RETURN 

se ' 

505 IFLEFTS(R$,1)=" "THENR$sMIDS(R$,2) 
510 IFLEFT$(R$,1)2"-"ANDABS(VAL (R$)) 41.0 
THENR$="-@"+MID$(R$, 2) 

515 DIsINSTR(RS,", ") 1D22INSTR(FZ2$,"." 
520 IF D2=@ AND D1<>@ THEN R$sMIDS(R$,1, 
D1-1) 

525 IF 0150 AND 0220 THEN R$=R$+".":D3= 
LEN(MID$(FZ$,D2+1)) 1F D3<>® THEN R$sR$« 
STRING$ (03, "0") DI 2INSTR(R$,". ") 18070535 
530 IF 0151 AND 02201 THEN R$=STRING$ (02 
-Di-1," ")e"Q"«R$1DI sINSTR(RÉ, ", ") 

535 IF 0250 THEN 560 

540 ' 

545 D3=LEN(MIDS$(R$,D1+1)) :DASLEN(MIDS(FZ 
$,D2+1)) 

550 IF D3<D4 THEN R$zR$*STRING$(DA-D3,"8 
в) 

555 IF D3>D4 THEN R$=MID$(R$,1,D1+D4) 
560 ' 

565 D3zD1-11D42D2-1 

570 IF D3=-1 THEN DSsLEN(R$) 

575 IF 04#-1 THEN D4=LEN(FZ$) 

580 IF D3<D4 THEN R$=STRINGS(D4-D3," ")+ 


$85 IF D3>D4 THEN R$zRIGHT$(R$,LEN(FZ$)) 
590 RETURN 


610 J*1 

620 IFMID$(R$,J,1)z" "THENJsJ*1:G0T02520 
638 R$zMID$(R$,J) : ХЈа ЕМ (К) : КЕТИКМ 

800 ' 

810 _РКІМТ "50": ХаРХ (1) 1 YsPY(LID1X!s2XsY! 
=¥:GOSUB48:LPRINT"M"+PT$ 

812 IFMN$(LI)=""THENX=X+60/FX:GOSUB32: X= 
X-60/FX:GOSUB32: X2X*60/FX1G08UB321G0T082 
0 

815 XeX*15/FX1X!2X1808UB321: Yz2Y-A/FY1Y!sY 
1608UB48:LPRINT"M"«*PT$ 

816 LPRINT"P"*MN$(LID1YzY*4/FY1Y!2Y1808U 
BA8:LPRINT"M"*PT$ 

817 XzX*15/FX1X!zX1808UB32: YzY-4/FYsX! =X 
1Y! zY1808UBAB: LPRINT"M"*PTÉ 

818 LPRINT"P"*MN$(LI)1YzY*4/FYiX!s2X1Y!oY 
1608UB48: LPRINT"M"*PT$:X2X*1S/FX1X! xy1Y! 
2Y1808UB32 

820 YzY-8/FY:X!2X1Y!2Y:808UBA81LPRINT"M" 
*PTS$:1LPRINT"S"*PSS:LPRINT"P "+LN$(LI):RE 
TURN 

2080 ' 

2010 LPRINTGRS:1LPRINT"A":LPRINTGRS:LPRIN 
T"CO" 1LPRINT"LQ" 

2020 Х0=0: YO=O:X1=480: Y¥i=-999 


2030 YzY1:808UB380:X2X11808UB30: Ү=ҮВ: GOSU .— 


В30: Х=Х0: GOSUB3Q 
2040 Х=120: Ү=- 120: G08UB311LPRINT"I" 


2050 TT$2T0$:52221X2300:808UB300 

2068 TT$=T1$1SZ=1: X=2601 0508300 

2070 NXzUX*TX1NYsUYSTY:DXz-XA/NX1 DYxYA/N 
Y 

2073 IFDX<>INT(DX) THENXASINT(ABS(DX) ) *NX 
180702070 

2074 IFDY<>INT(DY) THENYASINT(ABS(DYO) *NY 
:60702078 

2075 FXzXA/ (LX! -8Х) 1FYsYA/ (LY! -8Y) 

2080 LPRINT"H":IzDX:JzNX:808UBA4S:1LPRINT 
AXS$1LPRINT"H":IzDY: Ј= МУ: БОЗИВ46: | РКІМТАҮ 
$ 

2090 FI$ZFYSILPRINT"S1"ILPRINT"Q1":FORIs 
8 TO UY1R$28TR$(SY*I*(LY! -8Y) /UY) : 508085 
00:Xz-B* I*DY*TY1Y2*45 

2100 A'=X:B!=V¥:GOSUB44:LPRINT"M"+XY$:LPR 
INT"P"*R$1NEXTI 

2110 TT$zYL$18221:Yz73:608UB400 

2138 FI$zFXSILPRINT"S1":LPRINT"B1":FORIs 
0 TO UX1R$zSTRS(SX*I*(LX! -5Х) /ПХ) : В05085 
88:605UB500 

2155 Х=-25:А4!=1: 6050847: Ys ISDX*TX*XJ/2*C 
Wi-3 

2148 A!'zX:B!zY: GOSUBAA:LPRINT"M"*XY$:1LPR 
INT"P"*R$1NEXTI 

2150 TT$2XL$:182z11X2-90:GO05UB300 

2168 IFGDS="N"THEN2208 

2165 Х=ҮА: Ү=0: 6050831: У - ХА: БОБИВЪВ: Хай: 
6050830 

2170 Х=0:Ү=-ХА 

2175 YzY-DX«*TX11FY?zQTHEN2190ELSEGO0SUBS31 
: ХЕУА: 6050850 

2180 YzY-DX«*TX: IFY>=@THEN219@ELSEGOSUB31 
1X70 :608UB30 

2185 80T02175 

2198 Х=0:Ү=0 

2192 X=X+DV#TY: IFX>=VATHEN2Z2QQELSEGOSUBS 
1: Yz-XA1G08UB30 

2195 XsX*DY*TY: ТЕХ > УАТНЕМ22ВВЕ! БЕБОБИВЗ 
1:Ү=9 1605085 

2197 650702192 

2200 ' 

2205 IFMD=14THENID$=IE$+"/DAT"ELSEID$=IE 
$*"D.DO" 

2207 505089000: IFSTzÜTHENGOSUB?490: GOTO1 
gg 

2210 1158: INPUT#1 ,DUZ 

2238 LPRINT"H":LI=LI¢i:NN=N3(LI): ТЕММЕВТ 
HENNN=999 

2240 FOR M=1 TO NS(LI) 

2245 INPUT41,X1,Y1: ТЕХ1 2999, 999ANDY12999 
.999АМОМ= 1 ТНЕМ2245'° search for start 
2250 Х(М) =Хі:Ү(М) Yi: IF N3(LI)<999 THEN 
2270 

2268 IF X(M)2999,999 AND Ү(М) =999,999 TH 
EN 2280 

2278 NEXT M 

2280 LPRINT"C"*PC$(LIP) :LPRINT"L"*L$(LI) 
'select pen, line type 

2285 IFX(1)»LX!ORY(1)2LY!THENEM$z"Starti 
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ng coordinates do not lie within grid bo 
undaries":GOSUB9200:60T0180 

2287 606808800 ‘draw line title 

2290 XzX(1)1YzY(1)1X!zX1Y!zY1808UBABILPR 
INT"M"*PTSILPRINT"SQ" 

2500 ҒОКІз270М-1:Х-Х (1): YsYCID 1 IFXCIDOLX 
ГОКУ(Т) >ГУ ! ТНЕМ2 528 

2510 Х!=Х:Ү! зү; 6050832: IFMN$ (LI) <>" "ТНЕМ 
X2X-2/FX1YzY-4/FY1X! n1Y! жу; 808UBABILPRI 
NT"M"*PTS$1LPRINT"P"MNS$(LID:X2X42/FX1YsY4 
4/FYiX!zX1Y!zY1 GOSUBABILPRINT"M"*PT$ 
2328 NEXTI 

2330 IFG$(LI)z"Y"THEN2238 

2999 A!zQüiB!z-9991G608UBAAILPRINT"M"*XY$1 
LPRINT"A":LPRINT:RUN 

5500 ' 

6505 680589500 

6510 INPUTS1,T8$,T1$,XL$, YL$,GD$,UX,UY,S 
X,LX!,8Y,LY! , TX, TY, FXS, FYS, MKS, PSS 
6520 FORI=1T0Q:INPUT#1,L$(I) ,LNS$UID,G$(I 
) ,NSGID,PCSID „ММУ(Т) ,PXCGI) PY(I):NEXTI 
6538 CLOSE:RETURN 

7000 'end 

7010 STOP 

9008 'fileid 

9010 ОМЕККОКБОТО9 1 ВВ 

9050 5751: ІЕМр= 1 БТНЕМОРЕМ" 1", 1,105 ELSE 
ОРЕМ"КАМ: "+ 105 FOR INPUT AS 1 

9040 RETURN 

9100 IF ERRz52 THEN 5728: БОБИВУ4ВВ: RESUM 
E 9040 

9110 PRINT:IPRINT"Error $"ERR;"in line"ER 
L1:8TOP 

9208 CLS:PRINTEM$:8TOP 

9500 FORISITO18:N3S(I)2-999:16B$(I) z"A"16$ 
(I)2"N':LN$(I)""1L$(I) z""1PC$(I)z"" 1 MN$ 
{1) ж" = 
9310 PX(1)=999.999:PY(I)=999.999:NEXTI:R 
ETURN 

9400 A$=U$+"File "+К1 +" "«ID$*" "+U$+" d 
oes not exist. " 

9410 PRINT8154," "А$;:А$="Ргеѕв any key 
to continue "i1PRINT8246,A$; :LINEINPUTIN 
$: КОМ 

9999 CLS:IF MD=16 THEN END ELSE MENU 
10000 IF ЕКК<56 THEN RESUME ELSE ON ERRO 
R GOTO 0 


Listing 2: 


"RESPONSE FREQUENCY VS.TIME" 
"DEMONSTRATION PLOT","TIME (seconds) " 
'RESPONSE",N, 18 , 5 , ё, 18,8, 1.8 
+254, 2 „##.#,#.#,Ү,19 

8 уж1+, Se (-2Т) *2Te (- T) +4е(-Т) -5. 3е(-.5Т) 
hy Bi i dy A. BS 
8,Yz1-e(-0.337T) ,N, 21 ,2,0, 4 , 0.2 ө 
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Listing 3: 2 

8.0, @ 

8.5, .01537 

1.0, .03326 

1.5, .07330 

2.0, .13841 

2.9, .22231 

3.8, .31502 

3.5, .41144 

4.8, .50261 

4.5, .98583 

5.0, .65929 

5.5, .72248 

6.8, .77579 

6.5, .82005 

7.8, .85436 

7.5, 88586 

8.0, .90923 

8.9, .92867 

9,0, .94383 

9.5, .95586 
18.8, .96537 
999.999 , 999.999 
0,0, 0 

8.5, „1558086 

1.0, .28689 

1.5, «39479 

2.0, .49033 

2.5, .50936 

5.0, .63514 

3,5, .69256 

4.0, .74024 

4.5, .78052 

5.0, .81455 

5.5, .84331 

6.8, .86768 

6.5, .88813 

7.8, .90548 

7.5, «92814 

8.0, .93252 

8.5, .94298 

9.0, .95182 

9,5, .95929 
10.0, .96561 
999,999 , 999.999 
Listing 4: 

$ OPEN "TESTD.DO" FOR OUTPUT AS 1 
10 FORI=1T02 

20 FORX=@ TO 18 STEP .5 

30 ON I GOTO 40,50 

40 Yzi*.S*EXP(-2*X) %2%ХФЕХР(-Х) +4 #ЕХР (-Х 
)-S. S*EXP ( -, 5 #Х) : БОТОЬВ 

50 Y=1-EXP(-8.337#X) 

68 PRINTXj1",";LEFTS(STR$(Y) ,7) 
70 PRINTS1,USING"434, 8" 1 X; :EPRINTS1,",";LE 
FT$(STR$(YT) ,7) 

78 NEXTX 

79 PRINT41,"999,999 , 999,999": PRINT"9299 
4.999 , 999.999" 

80 NEXTI ECM 








Telecommunications 
and the Model lOO 


Te Radio Shack Model 100 is a 
forerunner to a new generation of 
briefcase computers. I have travel- 
ed with a Color Computer, and after a 
while found it to be quite a hassle. 

Before buying the Model 100, I saw 
many features I wish I had available 
before. I spend a lot of time on air- 
planes, and the Model 100 would seem 
an excellent way to type in long listings 
for any computer and then upload them 
later. The text editor is excellent; I’m 
glad to see itin ROM. The BASIC looks 
fantastic, with plenty of I/O commands 
for the RS-232 and modem ports; with 
16-digit precision, it’s great for scientific 
applications. 

The area I was mainly interested in 
was the telecom features, and the bal- 
ance of this review will concentrate on 
that area. First, I was using an 8K 
machine which booted up and allowed 
only about 5K for the user. I called upa 
BBS that had download programs on it 
and felt that it filled up too fast. As far 
as I’m concerned, the memory upgrades 
are somewhat expensive, but competi- 
tion from the prophesied Model 100 
lookalikes will probably take care of 
that problem. Five K is just not enough 
memory for any serious telecom work. 
If you are serious about this, 32K of 
memory is—in my opinion—a must. 

I hooked the 100 to my Color Com- 
puter with no problems. I loaded up 
ColorCom/E in my Color Computer 
and easily downloaded a small text pro- 
gram from the Model 100; going the 
other way was just as easy. When I tried 
chatting with another CoCo user, I ran 
into a problem in that I was unable to 
get the Model 100 to line feed. I'm sure 





(Bob Rosen is president of Spec- 
trum Projects and runs three 
Color Computer bulletin boards.) 


By Bob Rosen 


that two Model 100s connected together 
would have twice the problem. It would 
have been nice if Radio Shack had built 
in a user selectable automatic line feed 
insert capability at least to give its own 
display a line feed. A good example ofa 
telecom program with this capability is 
Eigen's ColorCom/E. 

I connected the modem cable to the 
Model 100 and had no problem check- 
ing into several bulletin boards. My real 
disappointment came when I tried to 
upload a file. A couple of bulletin 
boards took the file without problems, 
but several of them would drop charac- 
ters at the beginning of each line during 
an upload. I noticed there was no pause 
between lines sent from the Model 100, 
and apparently most BBS’s do a little 
processing between each line received. 

I tried uploading to a Flex system, 
using the BUILD command, and I was 
completely out of luck because the 
BUILD utility does a disk access after 
each carriage return. An option to send 
a line at a time would have been helpful, 
as well as some sort of programmable 
line delay. I even ran into an Atari- 
based BBS that wouldn’t read any char- 
acters at all because it seemed to have a 
certain amount of intercharacter delay. 

The bottom line of all this is that the 
upload feature is going to need a little 
work before it is universally usable. 
Tandy should have field tested this fea- 
ture on something besides a Model II 
and CompuServe. 

As far as the attractive features of the 
machine are concerned, the download 
feature worked well. I really liked the 
constant memory feature. I had to shut 
the computer off in a hurry several 
times, and the ability to store and call up 
numerous files without disk or tape 
adds real value. The Model 100 is 
impressive looking and fits well in an 
office. It's nice to be able to take a com- 
puter to work without having to rent a 








truck. The 40 x 8 display is easy to read, 
and I really liked the ability of the dis- 
play to flip to the previous page of text 
during the telecom mode. I wish Radio 
Shack had incorporated this into the 
text editor. I also really liked the auto 
dial feature; it worked satisfactorily for 
me dialing at 20 pulses per second, 
although it can be slowed down to 10 
PPS. 

A few other things I observed about 
the machine that might be useful to the 
potential buyer are listed here. | re- 
moved a cover on the bottom of the 
machine and found a ROM socket (I 
hope they will sell a spreadsheet soon) 
and a bus connector. 1 would like to see 
some articles pertaining to the use of 
that bus connector, as well as theory of 
operation for these new low power 
chips. I would like to point out that the 
cassette cable is the same as the one used 
on the Color Computer, and the Model 


100 loads at the same rate (1500 baud) 


as the Color Computer, which is really 
quite good. One other thing I noticed is 
that the modem seemed a little insensi- 
tive when trying to receive. ] was usinga 
marginal phone line and was able to 
transmit just fine; however, everything I 
received was garbage. A different mo- 
dem and terminal on the same line yield- 
ed good results. 

To sum it all up, І believe the Model 
100 is a good computer with lots of 
potential—with a little work, it could be 
a great computer. | mean for the criti- 
cism in this article to be constructive, 
and I hope that The Shack will bring 
about enhancements quickly. Other- 
wise, we will again have to rely on out- 
side vendors. I'm not so sure that other 
manufacturers will leave such a fantas- 
tic concept alone for very long. I forsee 
several Model 100 lookalikes ready for 
release before Christmas. Maybe by the 
time this article is released we will see 
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Financial Ratios Can Help 


Determine Corporate 'Soundness' 


By Vincent Lord 





inancial ratios are conveniently 
Ғе“ to determine the manner іп 

which a company is operated. If 
you deal with investments, such ratios 
are useful guidelines to determine the 
financial condition of the company. 
Since these ratios are based upon the 
balance sheet, the data you need is often 
published with the annual report. The 


The listing: 
10 CLEAR 100 


15 A$s"k4& 4k xt e x ex 

20 CLSsPRINT"###*#BUSINESS RATIOSss««" 
30 PRINT"(1) NET PROFIT ON SALES RATIO" 
40 PRINT"(2) RETURN ON INVESTMENT" 

50 PRINT"(3) CURRENT RATIO" 


net profit to sales ratio and the return on 
investment ratio are two means of 
determining profitability; the current 
ratio is a statement of liquidity. The 
program listed below allows the calcula- 
tion of the ratios which when compared 
with previous years' ratios can help 
determine the "soundness" of a 
company. 


320 INPUT"NET PROFIT 
330 INPUT"TOTAL INVESTED CAPITAL 
340 RI=NP/TC 


350 PRINT A$ 


The program will accommodate 
numbers up to those of the largest U. S. 
corporation without the unnecessary 
"cents," The output is in the form of 
fractions. If you wish to express the 
results in percentage, change lines 260, 
360, and 460 to PRINT USING “###.#+” 
;XX*100, where XX is the ratio, i.e. PS, 
RI, or CR. Good luck with your 
investments. 


"SNP 
"TC 


360 PRINT:PRINT"RETURN ON INVESTMENT"; :Р 


RINT USING "iHi. ###+"; RI 


INPUT"CURRENT LIABILITIES 


REM###CURRENT RATIO### 


PRINT"##*CURRENT ASSETS###" 
INPUT"CURRENT ASSETS 


"3CA 
"ері 


PRINT:PRINT"CURRENT RATIO";:PRINT US 


55 PRINT"(4) END PROGRAM" 370 GOSUB 550 
60 PRINT"SELECT 1, 2, 3, OR 4"; 399 RETURN 

70 NS=INKEY$ 400 

80 IF N$="" THEN 70 410 CLS 

980 ON VAL(N$) GOSUB 200,500,400,999 415 

100 GOTO 20 420 

200 REMX*«NET PROFIT ON SALES### 430 

218 CLS 440 CR=CA/CL 
215 PRINT"*##NET PROFIT ON SALES###" 450 PRINT A$ 
220 INPUT"NET PROFIT "jNP 460 

230 INPUT"NET SALES ";NS ING" #88, ###+"; CR 
240 PS=NP/NS 470 GOSUB 550 
250 PRINT A$ 480 RETURN 
260 PRINTiPRINT"NET PROFIT ON SALE";:PRI 


NT USING "#88. ###+";) Р5 
270 GOSUB 550 
288 RETURN 


300 REM***RETURN ON INVESTMENT* 


310 CLS 


TO MENU"; 


550 PRINT:PRINT"PRESS «ENTER? TO RETURN 


580 IF ІМКЕҮҘ=СНК$ (15) THENRETURN ELSE 5 


60 
570 RETURN 
999 MENU 


315 PRINT"###RETURN ON INVESTMENT###" 
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All work and no play makes Jack a dull boy... 


NOW YOU CAN HAVE 
FUN WITH YOUR 
24K MODEL 100 


4 games for your enjoyment: 


BLOCKADE — Your ‘snake’ grows longer as 
you hit the randomly appearing targets on the 
screen — as long as you don't run into yourself, 
a wall, or your opponent! A one or two player 
real-time game with optional sound and three 
speeds of play. 


REVERSI — A 'board' game in which you try to outflank your 
opponent to end up with the most squares at game's end. Play against 
the computer or another human. 


FRANKENSTEIN ADVENTURE - Find all of the necessary 
equipment to awaken the monster. The clues are hidden and the pitfalls 
are many! 


ALEXIS ADVENTURE — Sail the seas and traverse the islands to 
recapture your kingdom. Chart your course or you may sail on forever! 


— a lot of software for a little silver 


CERTIFICATION 
SEAL 


All four games on tape for only $24.95 SilverWare POBox 21101 
Calif. residents add 6% tax, overseas add $1.00 shipping Santa Barbara, CA 93121 


Mastercard & Visa Dealer inquiries invited (805) 966-1449 
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Radio Shack's New 
TRS-80° Model 100 
Portable Computer 
Is Sending Shockwaves 
Throughout the Industry 





? om 8K TRS-80 Model 100 24K TRS-80 Model 100 
b 26-3802 26-3801 

| Only $54 a Month Only $68 a Month 

on CitiLine Credit on CitiLine Credit 


Radio Shack 


m Powerful Built-In Software 
and Extended BASIC Language 
m Self-Contained Direct-Connect 
Telephone Modem 
m 8-Line by 40-Character Display 
m Full-Size Typewriter Keyboard 
m Retains Data When Power “Off” 
m Memory Expands to 32K 


TRS-80 


MODEL 100 
PORTABLE 
COMPUTER 


Brace yourself—Radio Shack just redefined the 
concept of personal computing. Our new TRS-80 
Model 100 is so small, it'll fit in your in-basket. 
Yet, it’s as powerful as many desktop micros. The 
built-in BASIC language is the most advanced 
ever from Microsoft®, and features full string han- 
dling, complete file operations, multi-dimension 
arrays, 14-digit double-precision accuracy, 

240 x 64 dot-addressable graphics, a five-octave 
sound generator and much more. The Model 100 
includes a parallel printer port, an RS-232C serial 
interface and a cassette port. Model 100’s built-in 
direct-connect modem even allows you to access 
any computer by phone. If you’re not a program- 
mer, “‘instant-on” software in ROM lets you use 
your Model 100 as a personal word processor, 
telephone auto-dialer, address book and appoint- 
ment calendar. Come see the most revolutionary 
computer since the TRS-80 Model I at over 6500 
Radio Shack stores and participating dealers, in- 
cluding over 400 Radio Shack Computer Centers 
nationwide. 





The biggest name in little computers® 
A DIVISION OF TANDY CORPORATION 

ee elis Koss aliia i iore oe ae eee ee DES 1 

Send me a free TRS-80 Model 100 brochure. 


Mail To: Radio Shack, Dept. 84-A-14 
300 One Tandy Center, Fort Worth, Texas 76102 


CODE NUM 





NAME 





ADDRESS 








CITY STATE ZIP 





i 1 
! 1 
1 L| 
[| 1 
4 1 
4 “4 
1 1 
! 4 
! ( 
‘ 1 
! 1 
[| 1 
4 1 
1 1 
1 | 


TELEPHONE 





Prices apply at participating Radio Shack stores and dealers. Microsoft is a 
registered trademark of Microsoft, Inc 





SHOWN ACTUAL SIZE 


Glancing at the 
New 1005 


Version o 


BASIC 


ell, I’ve just sat down and taken a good look at the Model 
W 100’s version of BASIC that (as with all other TRS-80s) was 
developed by none other than our good friends at Micro- 
soft. This version of BASIC has a few new commands and that’s what 
we're going to examine today. While there are many new and special- 
ized commands available for such esoteric uses as accessing the 
communications port, renaming and merging files, etc., I’m going to 
key on those commands that the "average" BASIC programmer (if 
there is such a thing) will find the most useful and interesting. 
Looking at all the commands available (in alphabetical order), the 
first "stranger" I see is the BEEP command. Using this command will 
cause the sound generator in the Model 100 to emit a tone for 4 
second. This certainly comes in handy when designing a program to 
signala user when he or she has made an error. Say, for example, that 
we have use for a subroutine that requests a response to a *yes or no" 
type question; the following routine could be used to prompt the user 
with an audible tone that a ^Y" or “М” was not entered: 


100 LINE INPUT A$ 

110 IF A$=“Y” OR A$=“N” THEN RETURN 
120 BEEP 

130 GOTO 100 


The next new command I see is the CALL command. This is used 
to call a machine language program in much the same way that the 
Model I, II, ІП, etc., uses the USR statement. The syntax of the 
CALL command is: 


CALL address,expression! ,expression2 
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where address is the decimal address of 
the beginning of the machine language 
program. Expressionl is optional and, 
if used, passes an integer argument to be 
loaded into the “A” register prior to 
jumping to the machine language rou- 
tine. Expression? is also optional and, if 
specified, will load the HL register pair 
with the integer number specified; an 
excellent method of passing the begin- 
ning address of an array or stack poin- 
ter. If you’re planning to write some 
nifty sorting or block move type of rou- 
tines in machine language, this is the 
way to go! This command supplies the 
machine language programmer with a 
more useful tool than the familiar USR 
function in that now two arguments can 
be passed to the machine language 
program. 

One of the new functions the Model 
100 has to offer is CSRLIN. This varia- 
ble name is reserved to contain the 
numeric value of the current line posi- 
tion (0—7) of the cursor; this might 
come in handy if designing a game or 
drawing program where the user is try- 
ing to produce a screen format. A cou- 
ple of other new variable names are 
DAYS and DATES; these contain the 
first three letters of the day (Mon, Tue, 
etc.) and the day as MM/DD/YY 
respectively. Incidentally, these (DAY$ 
and DATES)can appear on the left side 
of an equation to set the day and date. 

The FILES command lists to the 
video display all Model 100 files that are 
stored in RAM. This is just like issuinga 
DIR command from TRSDOS for you 
TRS-80 disk drive owners. It is interest- 
ing to note that the Model 100 treats 
everything— program, data file, text 
file—as a sequential data file. This 
means, oddly enough, that when you 
are in BASIC and are working on a pre- 
viously saved program, it is an OPEN 
file! You see, the RAM in the Model 100 
is a sort of combination RAM and disk 
drive. Therefore when you type FILES, 
the program that you are working on 
has an asterisk displayed to the right of 
it, indicating it is currently an open file. 
A word to the wise: don't attempt to 
KILL the program you are currently 
working on. As it is an open file, the 
"operating system" (if you'll pardon the 
expression) won't let you KILL it. 
Instead, type NEW, and then KILL 
"filename." 

For those of you familiar with the 
MEM function, the Model 100 uses a 


different, yet not unknown, command: 
FRE. If used in the form X=FRE(0), 
the variable “X” will contain the 
amount of available memory remain- 
ing. When used as X=FRE(A$) or 
Х<ЕКЕ(“”), the variable “X” will con- 
tain the amount of unused cleared string 
space. 

Another new command is HIMEM. 
This reserved variable contains the 
address of the highest location in 
memory available to BASIC. As with 
DAYS and DATES described earlier, 
HIMEM can appear on the left side of 
an equation to set the top of BASIC 
memory—a must for the machine lan- 
guage programmer if he wants his code 


and it works like this: X1, Yl and X2,Y2 
are the X and Y coordinates of the pix- 
els on the Model 100 LCD display. 
There are 240 pixels across and 64 
down, so any X coordinate must have 
the value 0—239, while the Y coordi- 
nate must contain a number in the range 
0—63. The “switch” parameter, if used, 
indicates how the line, or box is to be 
drawn. If the value of switch is odd, 
BASIC will set the pixels—that is, it will 
make the pixels dark. If switch is even, it 
will reset or clear the pixels. If "B" is 
used, a box will be drawn using the 
ХІ,ҮІ and X2,Y2 coordinates as 
corners of the box. If “F” is specified, 
the box will be filled (or unfilled) as 





“... И 16 interesting to note that the Model 100 treats 


everything— program, data file, test file—as a sequen- 


tial data file. This means, oddly enough, that when you 


are in BASIC and are working on a previously saved 


program, it is an OPEN file!" 





protected! 

The KEY command allows the eight 
function keys on the Model 100 (labeled 
F1-F8) to be customized. For example, 
the statement: 


KEY 1, “PRINT FRE(0)"+CHR$(13) 


will display the amount of free memory 
available whenever the Fl key is 
pressed. This can be entered as an 
immediate command or may appear as 
a line of code in a program. 

There's a simple command for copy- 
ing the LCD (liquid crystal display) to a 
printer: LCOPY. This will copy a dis- 
play (ignoring graphics symbols) to an 
attached printer. 

Now we're going to get to the good 
stuff, namely the LINE command. I'm 
used to programming primarily on a 
Model 16, so I don't have the luxury of 
you CoCo owners of a command such 
as LINE. But the Model 100 LINE 
command is something else. Not only 
will it draw a line from point A to point 
B, but it will also, if requested, draw a 
box, and even fill it in! The command 
syntax is 


LINE (X1,Y1)-(X2,Y2),switch, BF 


specified by “switch.” This command is 
going to be a real winner with those of 
you interested in designing grapics pro- 
grams. Watch for an example of this 
command in the next issue of PCM. 

The last command I’m going to 
review today is the SOUND command. 
It has the syntax: SOUND pitch, length. 
The variable “pitch” is a numeric value 
in the range of 0— 16383; “length” must 
have a value of 0 to 255, with 50 equal- 
ing approximately one second. The 
Model 100 manual provides a very nice 
table covering the pitch values needed 
tospan five complete octaves, including 
sharps. The SOUND command will be 
discussed further in the first installment 
of "The Music Box," a regular feature 
which will make its debut in the August 
issue of PCM. 

We've tried here to give you a sam- 
pling of some of the new commands 
available to the Model 100's BASIC 
interpreter. All in all, PoCo's version of 
BASIC can be summed up as an old 
friend with a fascinating variety of new 
commands to give the BASIC pro- 
grammer the tools needed to make the 
Model 100 operate easily and 


efficiently. РСМ 
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File Sorting 


Can be Good, 
But Beware of Pitfalls 





here is an excellent program in 

| the appendix of your Portable 

Computer manual which shows 

you how to sort document files (those 

with a .DO extension). But, there may 

be two problems with the program and 

you are advised to take care before 
using it. 

The main problem is a human one, 
based on the principle that we all make 
mistakes. Many times we find a pro- 
gram will not *run" simply because we 
have made an error in typing it into the 
computer. 

(PCM is attempting to help fight this 
problem by printing all of our longer 
listings in 40-column format—the same 
as your screen display. You can "line 
up" the characters one beneath another 
and that will help you check to see that 
you have typed them correctly.) 

The second problem is the program, 
as written, uses up quite a lot more 
memory than is necessary. This is 
because there are a great number of 
REMark statements in the sample pro- 
gram — and they use memory. While 
excellent for debugging and learning, 
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most of them can be eliminated to save 
memory space. 

However, there are a couple which 
are important to the running of the pro- 
gram. Since this is the most simple prob- 
lem to address, we will talk about it first. 


Saving Memory 

Every line which begins with an apos- 
trophe (’) can be eliminated from the 
program listing which begins on page 
202 of the manual, "Sample Session #3: 
Sorting .DO Files With A BASIC Pro- 
gram", except for the following: 


2000” 
3000” 


The reason these two lines cannot be 
eliminated is because they are used to 
call subroutines in Lines 1130, 1300, 
1320 and 1610. If you eliminate these 
two lines, the subroutines will have 
nowhere to go, and you will get an JUL 
ERROR. 

An alternate way of handling this 
would be to change all of the GOSUB 
2000 commands to GOSUB 2030 and 
the GOSUB 3000 command to GOSUB 
3030. Take your choice, but it is usually 
easier to leave in Lines like 2000 and 
3000 as dummy lines. It also makes your 
programming cleaner in that you begin 
subroutines on even numbers. 


Beware The KILL 

Of greater concern is Line 1645, 
which tells the Portable Computer to 
KILL the old file before the new file is 
written. 

The fact of the matter is that by the 
time you get to Line 1645, you are in the 
last stages of your program, and the 
chances that you have done something 
wrong are pretty small. But, Murphy's 
First Law (“If Anything Can Go 
Wrong, It Will") probably applies in 
computer programming more than 
anywhere else in the world. And thisisa 
perfect example of how old Murphy can 
run rampant through your RAM! 

For the sake of discussion, let's just 
assume you typed in Line 1650 with an 
error — you just hit the wrong key or 
something. 

The program would have KILLed 
your old document file in Line 1645, but 
then would break out of program exe- 
cution at Line 1650 because of the error. 
And, as soon as you edit the offending 
line, you lose the array which has all the 
information in your document file 
stored in memory. 

Have you got troubles! 

Suppose you spent two hours putting 


in names, addresses and telephone 
numbers into an ADRS.DO file the day 
before. Then, you decided to sort it with 
this program. All of a sudden, Murphy 
has wiped out your two hours worth of 
typing in one fell swoop of a ?SN error. 

What you have to do is make sure 
your sorting program works exactly 
right before you try it on any “live” files. 
Or, you have to make a backup copy of 
the original file. 

Making the backup is easier, but not 
as much fun. All you need to do is type 
in CSAVE “ADRS” ENTER and your 
file will be saved on tape. Then, if the 
worst happens, just re-load the file back 
into memory with CLOAD "ADRS" 
ENTER. 

But there is another way to do it, too. 
And you can have more fun with that. 


The Fun Way 
What we need to do is create a test file 


dle each series of letters the maximum 
number of times. 

Now, run the sorting program from 
BASIC. But, instead of using the ADRS 
file, use the TEST file. If you have an 
error that ends up killing your source 
file, all you need to do is create another 
one — something that can be done in a 
minute or two. And, that will save you 
from any problems with your data in the 
ADRS file. 

Once you have the sort working to 
perfection with your TEST data, just 
type in KILL *TEST.DO" and run the 
sort program using your ADRS file. 


More Goodies 

There are some other things you 
could do with this program—or the 
general outline of the program— with 
just a little modification. One of the 
most handy, it seems to us, is to print 
out the contents of the entire file. This 





and then use that for debugging the sort- 
ing program. Go to the main menu and 
call up the TEXT program. This will 
allow you to create a file for testing the 
sorting program. 

Since this is going to bea test, call the 
file TEST. Then, type in your own text 
file. 

We suggest using two or three letters 
of the alphabet for each listing. So, your 
TEST file might look like this: 


Youcan, of course, use as many of the 
letters of the alphabet as you want. But 
do not type them in in alphabetical 
order. 

In fact, to see how fast you can sort 
them under a “worst case" situation, 
type the alphabet exactly backwards. 
That will require the computer to han- 


would involve changing the write to 
RAM subroutine(Lines 1645-1690) to a 
printout subroutine. That way you 
could get a printout of the entire docu- 
ment file and, if you had sorted it first, 
you could have a sorted printout. 

Assuming your file is structured in 
the manner which is suggested by the 
manual, you would also be able to 
change the way the file is set up. Asan 
example, let's just suppose the first ten 
spaces are set up for a last name, the 
next ten for a first name and initial and 
the next eleven for telephone numbers. 
You could rearrange the way the file is 
constructed, using some of the string 
handling commands such as MIDS, 
LEFT$ and RIGHTS. And, of course, 
you could print out the rearranged file 
— without even disturbing the original 
file, if you wished to do so. 

We are very impressed with the con- 
struction of the two data base files built 
into the Portable Computer and believe 
there will be many applications which 
will prove useful to its users. 
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For coffee breaks or unavoidable waits, уои can take this little game along. But, be warned, 
you won't always win when you try to... 


Match Wits With Nim 


ll work and no play makes even 

a Portable Computer owner a dull 
person—so we offer you a little recrea- 
tion along with all the serious-type goo- 
dies that grace this, our first issue of 
PCM. 

In fact, recreation will be a part of 
PCM each month. When you need a 
little respite from the business trip, if 
you finish your memos before the plane 
lands, or in case you just want to play, 
we hope that these recreational 
moments will be a lot of fun for you. 
Look for them to become a regular part 
of PCM. 

And, what better way to start than 
with a "traditional" computer game that 
will, on one hand, show how smart your 
Portable Computer is and, at the same 
time, show off some of its graphic 
capabilites. The name of the game is 
NIM, and we're willing to bet that you 
can't beat the computer (but you 
might). 

NIM is based on the simple principle 
that you and your opponent each take 
turns at taking one or more little people 
away from one of three rows of figures. 
You can take all of the people in a cer- 
tain row—or only one of them. The 
winner is the one who is successful in 
taking the last person or people. You 
cannot take people from more than one 
row ata time, so, as you see, there is a bit 
of planning involved. 

The computer starts out real friendly, 
asking you whether you want to go first 
or not. But, then, it starts playing in 
earnest and won't give any quarter. See 
whether you can win. 

Note that you do not have to press the 
ENTER key to make any of your com- 
mands work. This version of N/M uses 
a special INKEYS routine that lets you 
just enter a response in most cases. 
When you do have to press ENTER, the 
program will tell you. 

Don't expect to win the first time out. 
But, you will have an option to play 
again. If you choose not to play again, 
the program returns you to the Model 
100's Main Menu. 

The people rows are numbered from 
top to bottom, with row one beingat the 
top. There are seven people in row one, 
five in row two and three in row three. 
Good luck! 
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The listing: 


18 CLEAR288:DEFINTA-Z 

15 CLS 

20 P(1)21401P (2) 22221P (3) 2304 

30 №1) =7:№(2) 5: М(3) 23 

40 X(1)201X(2)21 

50 CMz2 

60 IFCMz2THENKsVAL (RIGHT$ (TIME$,2) ) з РОКІ 
= | ТОК: Г зКМО (1): МЕХТТ 

100 80581000 

110 ІКз5:1С«4:605//8000:РКІМТЕ0, "Do you w 
ant"; " 

120 IR=4:IC=4:GOSUB6QO0:PRINT@Q,"to go fi 
rst?"; 

125 IR=*5:1C=8:GOSUB400:PRINT@Q,""; 

150 PLz0ü:A$zINPUTS(1) : IFA$z"Y"ORA$z"y"TH 
ENPL*1ELSEIFA$2z"N"ORA$z"n"THENPL22 

135 IF СМ=2 AND PL=@ THEN BEEP:GOTO 119 
ELSE IF СМ=1 AND PL=@ THEN 110 

140 PRINTA$;:GOSUB900:GOSUB1200 

150 IR=4:1C=8:GOSUB600:PRINT@O,STRING$(1 
7," ")} IRS31ICS21:608UB6900: PRINT8Q, "O.K. 
Buddy, "ss IR=5: IC21: 6050В200: PRINT8O, ""; 
1: IFPLZ1THENPRINT"You"; Е ЗЕРКТМТ"Т "11"; :Е 
X21 

168 PRINT" go first ..."j 

170 G0SUB900:605UB1200 

190 IF PL=1 THEN 500 

200 'computer's turn 

205 ІРЕХ=@ТНЕМІК=5: 1С=0: В050В000: PRINT@Q 
"Мон its my turn";:605UB900:PL72 

206 PRINT8G,STRING$(17," "); 

210 ЕХ=0: 6070240 

220 Јі= (4АМОМ (1) + (4АМОМ (2) ) ) /4: 7 2= (2АМОМ 
(1) + C2ANDN(2) ) * 2ANDN (3) ) ) /21J0 32 (1 АМОМ (1 
) + G1ANDN (22) + CLANDN(S) ) ) s IFINT(J1/2)*2sJ 
LANDINT(J2/2) #2=J2ANDINT (J3/2) #2=J3THENS 
T=QOELSEST=1 

250 RETURN 

240 G0SUB220: ТЕЗТЕВТНЕМЗВВ ELSE Mi=@:M2= 
0:Х-0 

250 FORI=1TO03 

260 ІРМ(І) « ТНЕМ290 

265 FORJ=1TON(I):IF X=1 THEN 280 

270 IzN(I):YsN(CI) -J1N(I) =Ү: 60808220: IFST 
zÜüTHENMIzI:M22J: Х5 |ЕБЕМ (ГТ) 57 

280 NEXTJ 

290 NEXTI 

295 ТЕХ | ТНЕМ4ВВ 

308 ‘pick randomly 

320 I=RND(X(CM)) +10: IFI2UQANDICATHENMISIE 
LSE320 

325 IFN(M1) =@THENS28 

330 I=RND(X(CM)) +10: IFIP2GANDIXN(MI) + | THE 
NM2=IELSE330 

350 N(ML)=N(M1)-M2 

400 ‘print computer's move 

410 IRz2:1C20:G08UB600: РКТМТЕВ, "Му move 
is:";:GOSUB900 

420 IR=4:GOSUB60@:PRINT@Q,"Row $";USING" 
#"; М1; : бБОБИВЯВВ 


430 IR=5:GOSUB6O00:PRINT@Q,"Number ="; М2; 
: БОБИВЯВВ 

448 БОБИВ:1ВВВ: ТК: 7: 1С=0: ВБОБИВБРВ: PRINTeG 
"Press any key ..."; : А #1 МРИТ8 (1) 

450 CLS:G0SUB1000 

460 60508700 

500 ‘player goes 

505 GOSUB220:PL=1 

507 1 Къ 5: 1 Сей: БОБИВЕВВ: PRINTGQ, "Your Mov 

e =="; 

510 ІК=5: 1С=0: ВОБЦИВАВВ: PRINT8G, "Enter Ro 

и (1-3):") 

520 A$zINPUT$(1): X3VAL(AS) 1 IF Х<1 OR X53 
THEN 520 

550 IF М(Х) <1 THEN 520 ELSE NzX:PRINTA$; 
535 IRz1*2*X110234:1608UB600: PRINT8O, "<-- 


540 IRz6:1C20:G08UB600: РКІМТ@О, "Нон many 
а 

550 A$ZINPUT$(1): XsVAL(AS) IF Х<1 ОК ХМ 
(N) THEN 558 

555 PRINTA$;:G08UB988: FÜRIS1TO6: IRSI: ICs 

@:GOSUB60@:PRINT@Q,STRING$(17," ");1NEXT 
I 

560 IRsS:1C23:1608UB600: PRINT8G,"O.K. "; 

570 N(N)=N(N)~-X: GOSUB900: CLS: G0SUB1000:6 

0808700: 6070200 

600 ON СМ GOTO 510,520 

610 Q=IR*8O+IC 

615 8070630 

620 051 К#40+ ТС 

638 RETURN 

700 ‘test for end 

710 IFN(1)20ANDN(2) =@ANDN(3) =@THENONPLGO 
T0720,7S50ELSERETURN 

720 'player wins 

730 MS$=" I don't believe you beat 
me!":60T0778 

750 ‘computer wins 

750 MS$="Tough luck buddy, better luck n 
ext time!" 

770 CLS: IR=3: 1С=0: GOSUBS8Q0: РКТМНТВВ,"";: Е 
ORISiTOLEN(MS$):PRINTMID$(MS$,I,1); FORJ 
=170300: МЕХТЈ: МЕХТТ 

800 GO0SUB908:CLS: ІК=3: 1С=12: 60508000 

810 PRINT@G,"Want to try again : "; :А 51 
NPUT$(1) 

820 IFAS="Y"ORAS="y"THENRUNELSEIFA$S="n"0 
RA$z"N"THENMENUELSEB810 

900 FORI=1T03000:NEXTI: RETURN 

1000 FOR Ізі TO 5: МЕМ(Т) :РЕР (ГТ): ТКЕР/ 49: 
ІС=Р-ІК#40: БОБИВАВВ: БОБИВ 1100: МЕХТ I 
1010 RETURN 

1100 PRINTéB,STRINGS(14," ")ysPRINT@Q,"" 
; : IFN=@THENRETURNELSEFORJ=1 TON: PRINTCHR$ 
(147) " "i1NEXTJ 

1110 RETURN 

1208 IR=3:10=8:GOSUB600:PRINT@Q, STRINGS ( 
20," "); : IR:51608UB600: PRINT8GO,STRING$(2 
Q," "); :RETURN шет 
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ne of the best uses for a 
(o is its ability to 
drill youngsters in basic 
fundamentals. The program listed 
below, T'EST, is a perfect example of a 
simple way to accomplish the drilling 
process with your Portable Computer. 

The program will easily run in an 8K 
system, provided you don't try to cram 
too many questions and answers in the 
DATA statements. In addition, it’s a 
good way to get some of the younger 
members of the family involved in 
computing. 

Two areas of the program will require 
some intervention by you. The first is in 
Line 400, where the number of what we 
call *Data Pairs" аге set. As you will see 
in the listing, Line 400 is set to three of 
these data pairs. To expand the pro- 
gram, merely change the 3 in Line 400 to 
the number of questions you want to 
ask. 

The other area is, of course, in setting 
up the questions and answers. One 
question and one answer constitute a 
"Data Pair." In each pair, the question 
is given first, then the answer in the 
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est Will Help 
Your Kids | 


format of a DATA statement. 

In the TEST program, the DATA 
lines begin with Line 600 and look like 
this: 


600 DATA “SPELL Four "Four" 
610 DATA "SPELL Five”, “Five” 
620 DATA "SPELL Six "Six" 


What is happening here is that Line 
600 is the first question, which is 
"SPELL Four." The answet is; of 
course, "Four." If the test-taker spells 
the word correctly, the Portable Com- 
puter will print “CORRECT.” If spelled 
wrong, it will print "INCORRECT" 
and the correct spelling of the word. The 
test-taker also has the option of deter- 
mining how many questions he; she will 
be asked. 

We have arbitrarily decided to 
enclose the questions and answers in 
quotes in the DATA statements. This is 
not necessary for a question and answer 
format of this sort. However, if either 
the questions or the answers are to con- 
tain commas, then it will be necessary to 
use the quotes. The reason for this is 





because BASIC recognizes a comma as 
setting apart items in a data list. - 

In other words, you do not have to 
put just one question and answer on а. 
line. You could just as easily use this 
construction (and we will говорне the | 
quotes here for illustration): 


600 DATA Spell Four, Four, ‘spell | 
Five, Five, Spell Six, Six 27. пи 


Both constructions work the M | 
way, provided you do not use commas 
in the questions or answers, i 


Pitfalls run 
The primary drawback of a program. 17 


of this type is that it requires the test- 


taker to answer the question exactly ав | 
the programmed answer. 
frankly, excellent for foreign language | 
word drill, math programs and testing | 


things like history dates. It can be used | 


very effectively in spelling, too, pro- | 


vided the student knows the definition _ 


of the words. Then, the question should | 
be the definition, and the test-taker | 
must type in the answer with’ uer correct 
spelling. ; 


ЛВ в ДІ 


Because of this, the program is not particularly suited to 
asking a student to define a word, unless the definitions are 
simple. For instance, if the student were asked for the event 
which occurred in 1066, and you had programmed the 
answer to be “Battle of Hastings", a response of “The Battle 
of Hastings" or, even “Battle Of Hastings" (large “О” on 
“ОҒ? would be judged wrong by the computer. This could 
be frustrating to a test-taker, especially when the program 
features a "score" at the end. 

A better way to handle this would be to have the computer 
ask “When Was The Battle of Hastings Fought?” and let the 
test-taker respond with “1066.” Computers are literal. 


Backwards Questions 

The random question-generating feature of this program 
eliminates one of the biggest problems encountered with 
students who drill themselves—they don't memorize 
answers; instead, they memorize the order in which the 
answers come. By randomizing the questions, this is not 
possible for them to do. 

However, many students also memorize answers one way 
(forwards) and not the other (backwards). As an example, a 
student may know that "gracias" means "thank you," but 
may not be able to answer the question the other way—as іп 
“Ном do you say "Thank You?" 

Backwards questions can be easily programmed in by 
including them twice, simply reversing the question and 
answer in the data pair. An example of this technique is: 


600 DATA gracias, thank you, thank you, gracias 
610 DATA casa, house, house, casa 


We have used this program to drill in French with an 
appreciable increase in student vocabulary test scores. 
The listing: 


17 кекке кке кекке IRE EERE EERE 
Р Ы QUIZ * 
woe FOR THE TRS-8@ MODEL 100 * 
АСЕ Adapted by * 
па L. C. Falk E 
b o! KHOE EROR RERO REOR EEEE EN 
7: 


10 INPUT "Your Мате"; МАЗ 

20 FOR 71-1 TO 1800: КЕВО Q$:IF @$="END" 

THEN 50 ELSE YsY*1:READ А%:МЕХТ 

38 CLS:PRINT:PRINT" Hello, "NAS"! "EPRI 

NT:PRINT" This is a test program. Would 
you liketo be tested?":INPUT" Please 
answer [Yles or [Nlo ";YN$ 

32 IF YN$z"N" ОК YN$="n" THEN END 

55 CLS: PRINT" If you answer the quest 
ions right, you will get another. If y 

ou answer wrong, the computer will s 

how you the right answer.”"sPRINT" If 


you SPELL the answer wrong, it will 
be wrong.” 

34 РОК WQ=1 TO 3000: МЕХТ WQ:FOR WB=1 TO 
10: CLS:PRINT8147," HERE WE 60!!!" 1 МЕ 


XT не 

70 CLS:PRINT:PRINT" 
do you want to 

80 DIM S(N) 

90 C=8 


How many questions 
try?": INPUTN 


100 Ni=@ 

118“ 

120 КЕБТОКЕ 

250 IF Съм THEN 550 

248 CzC*1 

350 CLS:PRINT 

360 PRINT "Question #"C 

370 PRINT STRING$(12,"-") 

380 PRINT 

400 X=INT(N#RND(1)) +1 

420 S(X)21 

430 FOR Өзі TO X 

440 READ 05, A$ 

445 IF 8$-2"END" THEN C=C-1:G60T0128 

450 NEXT 8 

450 PRINT 0% 

470 INPUT R$ 

480 IF R$sA$ THEN PRINT "CORRECT! 
!" SNISNI*1:PRINT8285," "S :LINEINPUT"Press 
«ENTER? To Continue";42$:60T0 110 

490 CLS:PRINT “INCORRECT ANSWER! ":PRINT: 

PRINT" The Correct Answer Is. . . . +» 


500 PRINT" "A$:1PRINT8285, "" 3 | ТМЕТМРИТ 
" Press «ENTER? To Continue"; А2$%: 607011 
0 

550 CLS:PRINT:PRINT" Well, "NAS". . ." 
: РКТМТ: PRINT" Of"N" questions, you ans 
меге "№" right." 

560 Pz(NI/N) +100: PRINT: PRINTUSING" Tha 
t's 434487 Right!"; P:END 

500 “жөқ ж ОКА 5 GO HERE Ж 

601 DATA THANK YOU,GRACIAS,GRACIAS, THANK 
You 

682 DATA CASA,HQUSE,HOUSE, CASA 

505 DATA AFTERNOON, TARDE, TARDE, AF TERNOON 
604 DATA NOCHE,NIGHT,NIGHT,NOCHE 

505 YOU'RE WELCOME,DE NADA,DE NADA,YOU'R 

E WELCOME 

606 DATA YES,SI,SI,YES 

607 DATA NO,NO,NO,NO 

508 DATA MADRE, MOTHER, MOTHER, MADRE 

689 DATA PADRE,FATHER,FATHER,PADRE 

610 DATA TAZA,CUP,CUP,TAZA 

611 DATA ESCRITO,PEN,PEN,ESCRITO 

612 DATA DONDE, WHERE, WHERE, DONDE 

613 DATA HOMBRE, МАМ, МАМ, HOMBRE 

614 DATA NINA,BABY,BABY,NINA 

615 DATA HERMOSA,SISTER,SISTER,HERMOSA 
616 DATA HERMOSO, BROTHER, BROTHER,HERMOSO 

617 DATA BONITA,PRETTY,PRETTY,BONITA 

618 DATA LIBRA, BOOK, BOOK, LIBRA 

619 DATA COCHE,CAR,CAR,COCHE 

620 DATA ВПЕМО , 6000, 6000, BUENO 

621 DATA MUJER,WOMAN,WOMAN, MUJER 

622 DATA DINERO,MONEY , MONEY, DINERO 

623 DATA ONE,UNO,UNO,ONE 

624 DATA TWO,DOS,DOS,TWO 

625 DATA THREE, TRES,TRES, THREE 

626 DATA QUATRO,FOUR,FOUR,QUATRO PCM] 
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PRICKLY-PEAR SOFTWARE 
. QUALITY PROGRAMS FOR YOUR MODEL 100 


PROGRAMS REQUIRE 46K EXTENDED BASIC FOR TAPE, AND 32K DISK UNLESS OTHERWISE NOTED. 


Monsters & Magic 


The most realistic fantasy role-playing game yet for the 
Color Computer. You start out by rolling up your characters 
basic ability scores and buying equipment. When you are 
ready it's into the dungeon. Your character starts at first 
level, but can rise in levels by garnering experience in the 
fray. If you have role-played fantasy games you will be 
amazed at the realism of the combat system. Armor class, 
initiative, and damage by weapon type are all included, 
with over 50 different monsters to fight- each with it's own 
abilities. As you rise in level you can win treasure and find 
magic weapons and spells - if you live!! You set the game 
length by telling how many monsters you want to fight 
before you reach your final battle to the death against the 
powerful Dungeon Lord. There are 1000+ place descrip- 
tion combinations in this text based game, and real excite- 
ment in every one! This is a fantasy simulation, and is truly 
not like any adventure game you have ever seen. For 1 
player; requires 32K extended BASIC. TAPE - $19.95, 
24K 


Astrology 


Truly a classic, this program will accurately cast your 
complete horoscope. You just enter the date, time, and 
place of birth. The sun sign, rising sign, mid heaven (MC), 
lunar nodes, and planetary influences including houses 
andaspects between the planets will all be calculated, and 
a full chart drawn. You can also do progressed charts and 
transits. It will even tell you the day of the week you were 
born. The accompanying book will help you interpret this 
chart of your horoscope. The extent of the documentation 
is tremendous, even by our exceptionally high standards, 
and no previous knowledge of the subject is required. You 
can share in this wisdom which has been used for thou- 
sands of years in many cultures. This program was written 
by a professional Astrologer. Please specify 16K or 32K 
system. $34.95 tape — 16K 


Viking! 


A simulation for 1 to 4 persons. Each begins as a land- 
owner, and by farming their land, buying and selling land, 
expanding their fishing fleet, building on to their manu- 
factory, increasing their population, equiping and training 
more soldiers, and regulating their taxes, each player tries 
to increase their economic power and rank until one 
becomes ruler over all. But beware plagues, rats, raiders, 
revolts, bad weather, and other misfortunes which may lie 
along the road to success. As you progress, see the map of 
your holdings increase. Playable in 1 to 2 hours, and 
different every time, you may have an addiction problem. 
$19.95 tape — 24K 


B 


о 
оо 
о 


GANGBUSTERS 


Gangbusters 


If you ever wanted to try a life of crime, this is your chance. 
You will start out as a Punk, but by using brains, and a little 
muscle, you can rise to become a Hood, Runner, Bookie, 
Torpedo, Fence, Kingpin, or win by becoming Syndicate 
Boss. Indulge yourself. Bribe a judge, or the District 
Attorney. Pay off the Cops. Take out a contract on another 
player, but watch out, they may be after you. Buy trucking 
companies, bootleg operations, houses of ill fame, but 
remember, if you get caught, you may do some hard time. 
Do you have what it takes to take over? This game will keep 
you close to your rod, get you thinking about bulletproof 
glass in your car, and definitely bring out the worst in you, 
but you'll love every minute of it. For 2 to 6 players, takes 
about 2 hours to play. Every game is excitingly different. 
$19.95 tape — 24K 


Stocked by Quality Dealers, or 


Send Order To: PRICKLY-PEAR SOFTWARE 


VISA 
aE 


Your personal check is welcome - no delay. Include 
$1.50 shipping for each program ordered. (Shipping free 
on $50.00 or larger orders). AZ residents add 7% sales 


Tucson, Arizona 85710 
tax. Orders shipped within two days. 


(602) 886-1505 





On The Road 


By Robert Frowenfeld 
PCM Contributing Editor 











r | Nhe emphasis of this column will 
be on programs that can be used 
when the Model 100 user is ex- 

actly that: on the road. Away from plot- 

ters, printers, telephones and the like; 
out in the wilderness, perhaps with 
nothing around you except the hum of 
the bees. Whether you're on a plane, or 
just simply want to relax with your 

PoCo, this column will provide you 

with both interesting and useful pro- 

grams. Our first article for "On The 

Road" will make the Model 100 gener- 

ate a loan amortization schedule. 

Say you want to buy a car, ora house, 
or maybe you're wondering how much 
money you can borrow if you're willing 
to plop down $250 a month for six 
months to buy your girl the diamond 
ring she swears she won't marry you 
without. Well, this program will do it all 
for you. It's a loan amortization pro- 
gram—the same type used by financial 
institutions (and your local friendly car 
dealer) to determine the periodic pay- 
ments as well as principle and interest 
credits during the life of a loan. 

The program listed below can be used 
in one of three ways: to find the periodic 
payment, to determine the amount of 
money that can be borrowed (loaned), 
or to compute the number of periods to 
repay a borrowed (or loaned) amount of 
money. 





( Robert Frowenfeld owns his own 
computer programming firm in 
Louisville, Ky., and has com- 
pleted his graduate coursework in 
Computer Science at the Univer- 
sity of Louisville.) 


In each instance the interest rate must 
be supplied; it is always typed in as a 
whole number, not asa percentage. For 
example, if the interest rate is 12.5 per- 
cent annually, it should be entered as 
12.50 and not as0.125. After the input is 
complete, the program prints out an 
amortization schedule, breaking down 
each period's payment into its principle 
and interest components. This comes in 
handy at tax time when you need inter- 
est payment figures for your itemized 
deductions. At the end of the program 
are printed totals for the amount of 
principle and interest paid out over the 
entire life of the loan. 

When it is required to compute the 
periodic payment, the user must enter 
the amount of the loan (the principle) 
and the number of periods required to 
repay the loan. You will notice that I 
constantly refer to the time between 
payments as “регіобв” and not 
"months." There's no particular reason 
for this other than the fact that nowhere 
is it written that a payment occurs once 
a month. It could be once a quarter, 
once a week, or once a year. The pro- 
gram does assume that there are 12 
payment periods per year, but this can 
be changed by redefining the variable 
"PY" on line 15 to be the number of 
payment periods per year. 

The second way the program can be 
used is to determine the amount of 
money that can be loaned or borrowed. 
The information required here is the 
amount of money to be paid in each 
period and the total number of pay- 
ments. This method can prove to be 


rather handy. 

The last mode of running this pro- 
gram is to supply the loan amount along 
with the required payment to compute 
the number of pay periods. 

An example of each of the three 
modes of operation is illustrated below, 
but first a quick lesson in algebra to 
show how the program works. The 
basic formula for computing the peri- 
odic payment is: 

P=V/((1+1)1(-N))/ I) 
Where: P = periodic payment 
V = loan value (principle) 
I — interest rate (per period) 
N — number of periods 
**Note: the character “t” means “raised 
to the power." 
Solving this equation for ‘V,’ the princi- 
ple yields the formula: 
V=P*((1-(1+1)t(-N))/ 1) 

In order to solve for the number of 
periods (given the principle *V' and the 
payment *P") requires some fancy foot- 
work. The variable ‘N’ is used as an 
exponent in the equation and therefore 
the log of both sides of the equation 
must be taken. Using the first equation 
above yields: 

P=V*1/(1-(1+1)1(-N)) 

This reduces to: 

V*1/P=1-(1+I)t(-N) and 

which becomes V*I/ P-1=-(1+1)t(-N) 

Taking the log of each side: 

LOG(-(V*1/ P-1))=-N*LOG(1+1) 

And finally: 
=-LOG(-(V*1/ P-1))/ LOG(1+1) 

This is performed by lines 300-310 of the 

program. 

One last note: The variable ‘PT$’ is 
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initialized on line 15 to a value of ‘N’; if a printout is desired 


along with the video output, change this value to 'Y.' 


Well, there you have it. Follow the example below and 
give it a try with your own numbers. Who knows? Maybe 


you can afford that new house after all! 


Interest Rate : 18.00% 
Loan Value 1$ 2,000.00 
# of Payments |: 24 

Monthly Payment:$ 92.29 


Pmt# Principle Interest Balance 
1 75.62 16.67 1,924.38 
2 76.25 15.04 1,848.13 
3 75.89 15,40 1,771.24 
4 77.53 14.76 1,693.71 
5 78.18 14.11 1,615.53 
6 78.83 13.46 1,535.70 
7 79.48 12.81 1,457.22 
8 80.15 12,14 1,377.87 
9 80.81 11.48 1,296.26 

19 81.49 10.80 1,214.77 
11 82.17 10.12 1,132.60 
12 82.85 9.44 1,049.75 
13 83.54 8.75 966.21 
14 84.24 8.05 881.97 
15 84.94 7.35 797.83 
16 85.65 6.64 711.38 
17 86.36 5.93 525.02 
18 87.08 5.21 537.94 
19 87.81 4.48 450.15 
20 88.54 3.75 361.59 
21 89.28 3.01 272.31 
22 90.02 2.27 182.29 
23 90.77 1.52 91.52 
24 91.52 0.76 9.00 


Total Interest : $ 214,95 
Total Principle : $ 2,000.08 


The listing: 

18 'Loan amortization program 
15 PY=12:PT$="N" 

20 Ғіз- "ІН? а НЯ. HH 
нын 

25 F2$="Pmt# Principle 
lance 


#808. 88 HRM, 


Interest Ba 


35 CLS 

40 PRINT@@G,"Interest Rate : "3 

45 LINE INPUT RT$:1RTsSVAL(RT$)11F КТ< 50 0 
R RT>1@@ THEN GOTO 10 ELSE PRINT@16,USIN 
в" 4394. "RT; 

50 PRINT"Z":XIsRT/(PY*10Q0) 

55 PRINT@4@,"Loan Value в "ра ТМЕТМР 
UT VL$:VL=VAL(VL$):IF VL<@ THEN GOTO 55 
60 IF VL<4>@ THEN PRINTESA, USING "S#88, 499 
Re" SVL 
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65 PRINT@8@,"# of Payments +: "ssLINEINP 
UT PR$:PREVAL(PR$) 

78 IF PR=@ AND VL=@ THEN 10 

75 IF RT=@ OR VL=@ OR PR=@ THEN PRINT@12 
@,"Monthly Payment: “;:LINEINPUT PM$:PM= 
VAL (PM$) 

80 ТЕ PM=@ AND (VL=@ ОК PR=0) THEN GOTO 
18 

85 IF PM=@ THEN GOTO 90 ELSE IF RT=@ THE 
М GOTO 208 ELSE IF VL=@ THEN GOTO 250 EL 
SE GOTO 300 

90 8#5У1/((1- (1 +ХТ)“ (-РВ)) /ХТ) 

95 GOSUB 790: РМхА# 

100 PRINT81280,"Monthly Payment:$"; USING" 
$8,999.99" SPM; 

150 GOTO 500 

200 GOTO 10 

250 XIsRT/1200 

260 А#=РМ#((1- (1+1) 7 (-РК))/ХТ) 

265 GOSUB 700:VL=A# 

270 РКІМТЕЗЬ, USING" б #44. ## "34; 

280 GOTO 500 

300 AzVL*XI/PMT-1:Bz1*XI 

310 PR=-LOG(-A)/LOG(B) 

320 IF РКУТМТ (РК) THEN PR=INT(PR) +1 

330 PRINT@97 USING" ##8"3 РК; 

500 PRINT@240,"Press any key to continue 
501 AS=""SAS=INKEY$:1F AS="" THEN GOTO 5 
081 

505 IF PT$z"Y" THEN PRINT824Q,STRING$(38 
4, ")A SECOPY 

505 PRINT6240,F2$1PRINTF3$ 

586 IF PT$z"Y" THEN LPRINT F2$1LPRINT F3 
$ 

510 Кай: МР=0:Т1=0: ТР= 0: УУзУ|. 

515 РОК Ізі TO РК: МРЕМР+ 1: БОБИВ 600 

520 PRINT USING Е 13; I; XB; ХА; XC 

525 IF PT$z"Y" THEN LPRINT USING F1$;I;X 
В; ХА; XC 

527 A$=""SAS=INKEY$: IF A$z""THEN 550 

528 A$z"":A$2INKEY$:1FA$z""THENS28 

530 NEXT I 

$40 PRINT:IF PT$z"Y" THEN LPRINT 

550 PRINT"Total Interest : $";TI:IF PT$= 
"Y" THEN LPRINT "Total Interest : $"jTI 
555 PRINT"Total Principle: $";USING"44,4 
84.49"; ТР 

557 IF PT$="Y" THEN LPRINT "Total Princi 
ple : $": 05ІМБ"##,###. ##"; TP 

560 PRINT:END 

600 A#=VL#XIsGOSUB 700: ХА=А#:ІЕ NP=PR TH 
EN XB=XC:XC=@ 

610 IF NP<>PR THEN XBzPM-XA: XCzVL-XB: VL 
VL-XB 

520 TISTI*XA: TP=TP+XB 

630 RETURN 

700 AK=INT( 100% (A#+. 0050014) ) /100: RETURN 
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SOFTWARE 


Blockade Requires 
Some Fast Fingers 


Aha, a game for the Portable Compu- 
ter. A game? Yes, a game. 

Actually, Blockade is the first of a 
package of several games from Silver- 
ware, the same people who are behind 
the very popular Chromasette and 
CLOAD tape and disk “magazines” for 
the Models I, III and Color Computer. 
As usual, their offerings are good. 

I believe that Blockade proves that 
there will be no problem with games for 
the Portable Computer. This one is 
patterned after an arcade-type game 
and I want to say that it takes a bit of 
practice to get going. Even after that 
happens, Blockade is a challenge! 

The game is simple in principle: You 
are a little snake on the screen and, 
using four keys, can move up or down, 
left or right. The object is to “hit” little 


targets as they appear randomly on the 
screen. They remain for random periods 
of time, too. 

Each time you do manage to “hit” a 
target, you get a number of points. And, 
while this sounds easy, it isn't. The rea- 
son forthat, simply, is because you can't 
touch the sides of the screen nor can you 
“doubleback” on yourself. 

Now, this may sound easy, but it is 
not. And, that is especially so because, 
as the saying goes, the better you get the 
more difficult things get to be. In short, 
your little snake grows to bea big snake 
as you begin to accumulate points. You 
run into the ever-increasing danger of 
doubling back over yourself — thereby 
losing points and moving closer to the 
end of the game. 

Blockade can be played with one or 
two players and has three levels of diffi- 
culty. That makes it a handy way to 
learn and impress your friends at the 
office (or your seatmate on an airplane). 


You lose five points when you run 
into something other than a target — be 
that the side of the board, your own 
snake or the other snake. You get a 
random number of points for each 
target hit. And the first person to reach 
100 points wins. However, the first per- 
son to get minus-100 points loses, so 
you can win Blockade without reaching 
100 yourself. 

The one-player game is a real chal- 
lenge and the two-player game can get 
fast and furious. All in all, Blockade is 
fun to play. 

Blockade comes on a tape with three 
other offerings, Reversi, Frankenstein 
Adventure and Alexis Adventure. All 
are specially formatted for the Model 
100 and the remainder will be reviewed 
in future issues of PCM. Stay tuned. 

Silverware, P.O. Box 21101, 

Santa Barbara, CA 93121, $24.95 

plus $1 shipping with three other 

games on same tape.) 











It Doesn't Cost A Lot To Plot 
with QuickPlot® 








SALES (x 1008) 





BEAST COAST 
mniO-WEST 





COMPANY xY - 


MONTHLY SALES 


1982 


ANAL 7515 


CENTRAL 





BEST COAST 









plotting. 











TRS-80 and CGP-115 are registered trademarks of Tandy Corporation. PC and 
PC/XT are registered trademarks of IBM Corporation. 









Complete QuickPlot Package Model 11/12/16........... $89 
Includes: Bar Chart, Pie Chart, Model 111/4 .............$89 
and Line Graph. Data and chart Model100.............. $49 Батар қанат Me 
formats save to disk for future ІВМ-РС/ХТ............. $89 


Now you have a friend in the software business. 






We've just given the CGP-115 Color 
Plotter business status. With Quick- 
Plot, your TRS-80 or IBM-PC can 
produce high quality line-, bar-, and 
pie-charts in vivid color. Simple data 
entry and flexible chart formatting 
makes QuickPlot and the CGP-115 
Color Plotter the logical choice for 
the professional who wants to plot 
his profits—not spend them. 
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SOLUTION 


Call or write to place your order or send for free 


(502) 937-4311 
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The Rackseller 


ALABAMA KENTUCKY Portland 80-Plus 
Madison Madison Books Benton Anderson Electronics PENNSYLVANIA 
ALASKA Pikeville Gus-Stan Enterprises Greensburg The Program Store 
Fairbanks Electronic World MAINE Pleasant Hills Pittsburgh Computer Store 
Fairbanks News Agency South Portland Portland News Со. SOUTH CAROLINA 
ARIZONA MARYLAND Greenville Palmetto News Co. 
Phoenix Road Runner Baltimore The Program Store North 
Computer Pro Kensington The Program Store Charleston The Green Dragon 
CALIFORNIA MASSACHUSETTS TENNESSEE 
Atwater Electro Brain Cambridge The Program Store Memphis Computer Center 
North Littleton Computer Plus Smyma Delker Electronics, Inc. 
Hollywood Levity Distributors Marlboro Radio Shack TEXAS 
DELAWARE MICHIGAN Austin Capitol Micro Computers 
Wilmington Normar Inc.— The Smoke Shop Novi MI Software Dist., Inc. Software & Things 
DISTRICT OF COLUMBIA NEBRASKA Dallas Micro Concepts, Inc. 
The Program Store Lincoln Hobby Town Ft. Worth RFI Electronics 
FLORIDA NEW HAMPSHIRE Irving Software Access 
Ft. Lauderdale Software Connection Manchester Brookwrights VIRGINIA 
Winter Park Independent Computer Systems West Lebanon Verham News Corp. Falls Church The Program Store 
GEORGIA NEW JERSEY WASHINGTON 
Trenton The Phone Line Hackensack Total Circulation Service Blaine Compulit Dist. 
ILLINOIS Midland Park Software City Richland C & J Electronics Computer Center 
Chicago Prairie News Agency NEW YORK WISCONSIN 
INDIANA Johnson City Unicom Electronics Portage Sam's Electronics 
Elkhart Elkhart City News & Book Store OHIO CANADA: 
Indianapolis Computer Store Cincinnati Color Software Center ALBERTA 
Madison Arco Office Supplies Columbus The Program Store Calgary Rainbow Software Services 
Scottsburg Radio Shack of Scottsburg Lakewood Lakewood International Edmonton Kelly's Software Distributors 
KANSAS Toledo Leo's NOVA SCOTIA 
Salina Radio Shack Reitz Electronics, Inc. Halifax Atlantic News 
Topeka Town Criers of Topeka OREGON ONTARIO 
Wichita Amateur Radio Equipment Co. Eugene Libra Books, Inc. Hamilton Galls Book World 
Lloyd's Radio Medford John's News Stand 


Your Perfect Portable Companion 


Now, here's your opportunity to have PCM — The Portable Computing Magazine delivered to your home 
or office each month! 

PCM will bring you the finest and most up-to-date information available anywhere for your TRS-80 
Model 100 Portable Computer. Whether your interest is programming, using the Portable Computer's 
fabulous built-in functions or communicating with other Portable owners, PCM is for you. 

Each month we'll bring you a host of articles, ready-to-run programs for business and professional use or 
just plain fun. And each article will be in an easy-to-read style...not computerese. 

Subscribe to PCM today! A dozen issues are only $28 ($35 in Canada and Mexico). 


ГТП ИИ ы ыы 


PCM — The Portable Computing Magazine 


9529 U.S. 


Highway 42 


P.O. Box 209 


Prospect, 


KY 40059 


YES! Sign me up for a year (12 issues) of Portable Computing 


Name 
Address 


(502) 228-4492 


City 
O Payment Enclosed 
Charge 0 VISA 


State 
о MasterCard D American Express 
Account Number Interbank # (MC only) 
Signature. | Card Expiration Date. 
Subscriptions to Portable Computing are $28 a year in the United States. | 
Canadian and Mexican rate is U.S. $35. Surface rate elsewhere U.S. $64. Air mail 


U.S. $85. АП subscriptions begin with the current issue. Please allow 5-6 weeks for 
first copy. 


AMERICAN] Cards 
SSress Welcome 
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SAVE $100 





on the TRS-80 Model 100 with 8K RAM 
stock 426-3801 


$699 


For quick delivery call: 


SPECTRUM PROJECTS 


93-15 86th DRIVE 
WOODHAVEN, NY 11421 
PCM (212) 441-2807 


Add $4 shipping and handling. N.Y. residents add sales tax. 
Call our Bulletin Board for free Model 100 programs. BBS #1 — (212) 441-3755 


BBS #2 — (212) 441-3766 
BBS #3 — (212) 441-5719 





Says who? Says ANSI. 

Specifically, subcommittee X3B8 of the American 
National Standards Institute (ANSI) says so. The fact 
is all Elephant™ floppies meet or exceed the specs 
required to meet or exceed alll their standards. 

But just who is “subcommittee X3B8” to issue such 
pronouncements? 

They're a group of people representing a large, 
well-balanced cross section of disciplines—from 
academia, government agencies, and the computer 
industry. People from places like IBM, Hewlett-Packard, 
3M, Lawrence Livermore Labs, The U.S. Department 
of Defense, Honeywell and The Association of Com- 
puter Programmers and Analysts. In short, it's a bunch 
of high-caliber nitpickers whose mission, it seems, in 
order to make better disks for consumers, is also to 


make life miserable for everyone in the disk-making 
business. 

How? By gathering together periodically (often, 
one suspects, under the full moon) to concoct more 
and more rules to increase the quality of flexible 
disks. Their most recent rule book runs over 20 single- 
spaced pages—listing, and insisting upon—hundreds 
upon hundreds of standards a disk must meet in 
order to be blessed by ANSI. (And thereby be taken 
seriously by people who take disks seriously.) 

In fact, if you'd like a copy of this formidable docu- 
ment, for free, just let us know and we'll send you 
one. Because once you know what it takes to make 
an Elephant for ANSI... 

We think you'll want us to make some Elephants 
for you. 


For a free poster-size portrait of our powerful pachyderm, please write us. 
Marketed exclusively by Leading Edge Products, Information Systems and Supplies 
Division, 55 Providence Highway, Norwood, MA 02062. Dealers: call toll-free 
1-800-343-8413; or in Massachusetts, call collect (617) 769-8150. 


